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HTC/OS ASSEMBLER LANGUAGE 

This publication contains specifications for the IBll Sy8tem/360 
Operating System Assembler Language (Level F) modified to be compatible 
with the extended Hybrid Technology Computer (HTC) , i.e., the HTC including 
the short precision option and the double precision fixed-point arithmetic 
option. 

The assembler language is a symbolic programming language used to 
write programs for the HTC. The language provides a convenient means for 
representing the machine instructions and related data necessary to program 
the HTC. The IBM HTC Operating System Assembler Program processes the 
language and provides auxiliary functions useful in the preparation and 
documentation of a program, and includes facilities for processing the 
assembler macro language. 

Part I of this publication describes the assembler language. 

Part II of this publication describes an extension of the assembler 
language — the macro language — used to define macro instructions. 



PREFACE 

This publication is a reference manual for the programmer using the 
assembler language and its features. 

Part I of this publication presents information common to all parts of 
the language followed by specific information concerning the symbolic 
machine instruction codes and the assembler program functions provided for 
the programmer's use. Part II contains a description of the macro language 
and procedures for its use. 

Appendices A through J follow Part II. Appendices A through F are 
associated with Parts I and II and present such items as a summary chart 
for constants, instruction listings, character set representations, and 
other aids to programming. Appendix G contains macro language summary 
charts, and Appendix H is a sample program. Appendix I is a features 
comparison chart of System/ 360 assemblers. Appendix J includes samples of 
macro definitions. 

Knowledge of HTC machine operations, particularly storage addressing, 
data formats , and machine instruction formats and functions , is 
prerequisite to using this publication, as is experience with programming 
concepts and techniques or completion of basic courses of instruction in 
these areas. HTG machine operations are discussed in the publication "HTC 
Principles of Operation . " Information on program assembling , linkage 
editing, executing, interpreting listings, and assembler programming 
considerations is provided in "OS Assembler (F) Programmer's Guide," Order 
No. GC26-3756. 

The following publications are referred to in this publication: 

OS Introduction , Order No. GC28-6534 

OS Utilities , Order No. GC28-6586 

OS Loader and Linkage Editor , Order No. GC28-6538 

OS Supervisor Services and Macro Instructions , Order No. GC28-6646 

OS Data Management Macro Instructions , Order No. GC26-379A 

OS Data Management Services Guide , Order No. GC26-37A6 
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SECTION 1: INTRODUCTION 

Computer programs may be expressed in machine language , i.e., 
language directly interpreted by the computer, or in a symbolic language, 
which is much more meaningful to the programmer. The symbolic language, 
however, must be translated into machine language before the computer can 
execute the program. This function is accomplished by a processing 
program. 

Of the various symbolic programming languages, assembler languages are 
closest to machine language in form and content. The assembler language 
discussed in this manual is a symbolic programming language for the IBM 
System/360. It enables the programmer to use all IBM Sy8tem/360 machine 
functions, as if he were coding in System/360 machine language. 

The assembler program that processes the language translates symbolic 
instructions into machine-language instructions, assigns storage locations, 
and performs auxiliary functions necessary to produce an executable 
machine-slanguage program. 

Compatibility 

The HTC assembler uses the standard S/360 instruction set with the 
following exceptions: 

1. The HTC I/O is different from S/360 and only uses the SIO 
instruction. The SIO instruction format has been changed from SI 
to an RS format. The S/360 TIO, HIO, and TCH instructions are 
not supported by the HTC assembler. 

2. A new instruction. Timer Read and Set (TMRS) has been added for 
the HTC. The TMRS instruction has an RS format and the storage 
operand must be aligned on a half word boundary. 

3. The HTC assembler does not support the S/360 Floating Poin t 
^Feature instructions , the Decimal Feature instructions , tne 

Direct Control Feature instruction s, the Channel Command Word 
(CCW) assembler instruction, or the Insert Storage Key (ISK) 
instruction. 

4. No S/370 instructions are supported by the HTC assembler. 

5. All extended HTC instructions, i.e., instructions in the short 
precision option or the double precision fixed-point arithmetic 
option, are not in the S/360 instruction set. 

THE ASSEMBLER LANGUAGE 

The basis of the assembler language is a collection of mnemonic 
symbols which represent: 



1-1 



1. Sy8tem/360 machine-language operation codes, 

2. Operations (auxiliary functions) to be performed by the assembler 
program. 

The language is augmented by other symbols, supplied by the 
programmer, and used to represent storage addresses or data. Symbols are 
easier to remember and code than their machine-language equivalents. Use 
of symbols greatly reduces programming effort and error. 

The programmer may also create a type of instruction called a macro 
instruction. A mnemonic symbol, supplied by the programmer, serves as the 
operation code of the instruction. 

Machine Operation Codes 

The assembler language provides mnemonic machine-instruction operation 
codes for all machine instructions in the IBM System/360 Universal 
Instruction Set and extended mnemonic operation codes for the conditional 
branch instruction. 

Assembler Operation Codes 

The assembler language also contains mnemonic assembler-instruction 
operation codes, used to specify auxiliary functions to be performed by the 
assembler. These are instructions to the assembler program itself and, 
with a few exceptions, result in the generation of no machine-language code 
by the assembler program. 

Macro Instructions 

The assembler language enables the programmer to define and use macro 
instructions. 

Macro instructions are represented by an operation code which stands 
for a sequence of machine and/or assembler instructions. Macro 
instructions used in preparing an assembler language source program fall 
into two categories: system macro instructions, provided by IBM, which 
relate the object program to components of the operating system; and macro 
itistructions created by the programmer specifically for use in the program 
at hand, or for incorporation in a library, available for future use. 

Programmer-created macro instructions are used to simplify the writing 
of a program and to ensure that a standard sequence of instructions is used 
to accomplish a desired function. For instance, the logic of a program may 
require the same instruction sequence to be executed again and again. 
Rather than code this entire sequence each time it is needed, the 
programmer creates a macro instruction to represent the sequence and then, 
each time the sequence is needed, the programmer simply codes the macro 
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instruction statement . During assembly, the sequence of instructions 
represented by the macro instruction is inserted in the object program. 

Part II of this publication discusses the language and procedures for 
defining and using macro instructions. 

THE ASSEMBLER PROGRAM 

The assembler program, also referred to as the "assembler," processes 
the source statements written in the assembler language. 

Basic Functions 

Processing involves the translation of source statements into machine 
language,, the assignment of storage locations to instructions and other 
elements of the program, and the performance of the auxiliary assembler 
functions designated by the programmer. The output of the assembler 
program is the object program, a machine-language translation of the source 
program. The assembler furnishes a printed listing of the source 
statements and object program statements and additional information useful 
to the programmer in analyzing his program, such as error indications. The 
object program is in the format required by the linkage editor component of 
Operating System/360. (See the linkage editor publication.) 

The amount of main storage allocated to the assembler for use during 
processing determines the maximum number of certain language elements that 
may be present in the source program. 

PROGRAMMER AIDS 

The assembler provides auxiliary functions that assist the programmer 
in checking and documenting programs, in controlling address assignment, in 
segmenting a program, in data and symbol definition, in generating macro 
instructions, and in controlling the assembler itself. Mnemonic operation 
codes for these functions are provided in the language. 

Variety in Data Representation ; Decimal, binary, hexadecimal, or character 
representation of machine-language binary values may be employed by the 
programmer in writing source statements . The programmer selects the 
representation best suited to his purpose. 

Base Register Address Calculation : As discussed in "IBM System/360 : 
Principles of Operation," the System/360 addressing scheme requires the 
designation of a base register (containing a base address value) and a 
displacement value in specifying a storage location. The assembler assumes 
the clerical burden of calculating storage addresses in these terms for the 
symbolic addresses used by the programmer. The programmer retains control 
of base register usage and the values entered therein. 
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Relocatabillty : The object programs produced by the assembler are in a 
format enabling relocation from the originally assigned storage area to any 
other suitable area. 

Sectioning and Linking ; The assembler language and program provide 
facilities for partitioning an assembly into one or more parts called 
control sections • Control sections may be added or deleted when loading 
the object program. Because control sections do not have to be loaded 
contiguously in storage, a sectioned program may be loaded and executed 
even though a continuous block of storage large enough to accommodate the 
entire program may not be available. 

The assembler allows symbols to be defined in one assembly and 
referred to in another, thus effecting a link between separately assembled 
programs. This peirmits reference to data and transfer of control between 
programs. A discussion of sectioning and linking is contained in Section 
3 under the heading, "Program Sectioning and Linking." 

Program Listings : A listing of the source program statements and the 
resulting object program statements may be produced by the assembler for 
each source program it assembles. The programmer can partly control the 
form and content of the listing. 

Error Indications ; As a source program is assembled, it is analyzed for 
actual or potential errors in the use of the assembler language. Detected 
errors are indicated in the program listing. 

OPERATING SYSTEM RELATIONSHIPS 

The assembler is a component of the IBM System/360 Operating System 
and, as such, functions under control of the operating system. The 
operating system provides the assembler with input /output, library, and 
other services needed in assembling a source program. The output object 
program produced by the assembler will be linkage edited by a S/360 Linkage 
Editor. The HTC Formatter Program translates linkage editor output into 
magnetic tape or paper tape forms for loading into the HTC. 
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SECTION 2: GENERAL INFORMATION 

This section presents information about assembler language coding 
conventions and assembler source statement structure addressing. 

ASSEMBLER LANGUAGE CODING CONVENTIONS 

This subsection discusses the general coding conventions associated 
with use of the assembler language. 

Coding Form 

A source program is a sequence of source statements that are punched 
into cards. The standard card form, IBM 6509 (shown in Figure 2-2), can be 
used for punching source statements. These statements may be written on 
the standard coding form, GX28-6509 (shown in Figure 2-1), provided by IBM. 
One line of coding on the form is punched into one card. The vertical 
columns on the form correspond to card columns. Space is provided on the 
form for program identification and instructions to keypunch operators. 

The body of the form (Figure 2-1) is composed of two fields : the 
statement field, columns 1-71, and the identification-sequence field, 
columns 73-80. The identification-sequence field is not part of a 
statement and is discussed following the subsection "Statement Format.** 

The entries (i.e., coding) composing a statement occupy columns 1-71 
of a line and, if needed, columns 16-71 of one or two successive 
continuation lines. 
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Figure 2-2. Punched Card Form 
Continuation Lines 

When It Is necessary to continue a statement on another line, the 
following rules apply. 

1. Write the statement up through column 71. 

2. Enter a continuation character (not blank and not part of the 
coding) In column 72 of the line. 

3. Continue the statement In column 16 of the next line, leaving 
columns 1 through 15 blank. 

4. If the statement Is not finished before column 71 of the second 
line, enter a continuation character In column 72, and continue 
In column 16 of the following line. 

5. The statement has to be finished before colijmn 71 of the third 
line, because the maximum number of continuation lines Is two. 

6. Macro Instruction can be coded on as many lines as are needed. 

These rules assume that normal source statement boundaries are used 
(see "Statement Boundaries*' below) . 

Statement Boundaries 

Source statements are normally contained In columns 1-71 of statement 
lines and columns 16-71 of any continuation lines. Therefore, columns 1, 
71, and 16 are referred to as the "begin," "end," and "continue" columns, 
respectively. (This convention can be altered by use of the Input Format 
Control [ICTL] assembler Instruction discussed later In this publication.) 
The continuation character. If used, always Immediately follows the "end" 
column. 

Statement Format 

Statements may consist of one to four entries In the statement field. 
They are, from left to right: a name entry, an operation entry, an operand 
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entry, and a comments entry. These entries must be separated by one or 
more blanks, and must be written In the order stated. 

The coding form (Figure 2-1) Is ruled to provide an 8-character name 
field, a 5-character operation field, and a 56-character operand and/or 
comments field. 

If desired, the programmer can disregard these boundaries and write 
the name, operation, operand, and comment entries in other positions, 
subject to the following rules: 

1. The entries must not extend beyond statement boundaries within a 
line (either the conventional boundaries if no ICTL statement is 
given, or as designated by the programmer via the ICTL 
instruction) . 

2. The entries must be in proper sequence, as stated previously. 

3. The entries must be separated by one or more blanks. 

4. If used, a name entry must be written starting in the begin 
column. 

5. The name and operation entries must be completed in the first 
line of the statement, including at least one blank following the 
operation entry. 

A description of the name, operation, operand, and comments entries 
follows : 

Name Entry ; The name entry is a symbol created by the prograiraner to 
identify a statement. A name entry is usually optional. The symbol must 
consist of eight characters or less, and be entered with the first 
character appearing in the begin column. The first character must be 
alphabetic. If the begin column is blank, the assembler program assumes no 
name has been entered. No blanks can appear in the symbol. 

Operation Entry : The operation entry is the mnemonic operation code 
specifying the machine operation, assembler, or macro instruction operation 
desired. An operation entry is mandatory and cannot appear in a 
continuation line. It must start at least one position to the right of the 
begin column. Valid mnemonic operation codes for machine and assembler 
operations are contained in Appendices D and E of this publication. Valid 
operation codes consist of five characters or fewer for machine or 
assembler-instruction operation codes, and eight characters or fewer for 
macro instruction operation codes . No blanks can appear within the 
operation entry. 
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Operand Entries : Operand entries identify and describe data to be acted 
upon by the instruction, by indicating such things as storage locations, 
masks, storage-area lengths, or types of data. 

Depending on the needs of the instruction, one or more or no operands 
can be written. Operands are required for all machine instructions, but 
many assembler instructions require no operand. 

Operands must be separated by commas, and no blanks can intervene 
between operands *^nd the commas that .separate them. The first blank 
normally indicatea the end of the operand field. 

The operands cannot contain embedded blanks, except as follows: 

If character representation is used to specify a constant, a literal, 
or iimnediate data in an operand, the character string can contain 
blanks, e.g. , C'A D' . 

Comment Entries ; Comments are descriptive items of information about the 
program that are shown on the program listing. All 256 valid characters 
(see "Character Set" in this section) , including blanks can be used in 
writing a comment. The entry can follow the operand entry and must be 
separated from it by a blank; each line of comment entries cannot extend 
beyond the end column (column 71) . 

An entire statement field can be used for a comment by placing an 
asterisk in the begin column. Extensive coimnent entries can be written by 
using a series of lines with an asterisk in the begin column of each line 
or by using continuation lines. Comment entries cannot fall between a 
statement and its continuation line. 

In statements where an optional operand entry is omitted but a comment 
entry is desired, the absence of the operand entry must be indicated by a 
comma preceded and followed by one or more blanks, as follows: 



Name 


Operation 


Operand 




END 


COMMENT 



For instructions that cannot contain an operand entry, this comma is not 
needed . 

Note: Macro prototype statements without operands will not tolerate 
comments, even if a coimna is coded as shown above. 

For information on rules for the operand field of different assembler 
instructions, refer to the table in Appendix E. 
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statement Example : The following example Illustrates the use of name, 
operation, operand, and comment entries. A compare instruction has been 
named by the symbol COMP; the operation entry (CR) is the mnemonic 
operation code for a register-to-register compare operation, and the two 
operands (5,6) designate the two general registers whose contents are to be 
compared. The comment entry reminds the programmer that he is comparing 



"new sum" to "old" with this instruction. 



Name 


Operation 


Operand 


COMP 


CR 


5,6 NEW SUM TO OLD 



Identification-Sequence Field 

The identification-sequence field of the coding form (columns 73-80) 
is used to enter program identification and/or statement sequence 
characters. The entry is optional. If the field, or a portion of it, is 
used for program identification, the identification is punched in the 
source cards and reproduced in the printed listing of the source program. 

To aid in keeping source statements in order, the programmer can 
number the cards in this field. These characters are punched into their 
respective cards, and during assembly the programmer may request the 
assembler to verify this sequence by use of the Input Sequence Checking 
(ISEQ) assembler instruction. This instruction is discussed in Section 5, 
under "Program Control Instructions." 

Summary of Statement Format 

The entries in a statement must always be separated by at least one 
blank and must be in the following order: name, operation, operand (s), 
comment (s) . 

Every statement requires an operation entry. Name and comment entries 
are optional. Operand entries are required for all machine instructions 
and most assembler instructions. 

The name and operation entries must be completed in the first 
statement line, including at least one blank following the operation entry. 

The name and operation entries must not contain blanks. Operand 
entries must not have blanks preceding or following the commas that 
separate them. 

A name entry must always start in the begin column. 
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If the column after the end column is blank, the next line must start 
a new statement. If the column after the end column is not blank, the 
following line is treated as a continuation line. 

All entries must be contained within the designated begin, end, and 
continue column boundaries. 

Character Set 

Source statements are written using the following characters: 

Letters A through Z, and $, //, @ 

Digits through 9 

Special 

Characters +-,=.*() ' / & blank 

These characters are represented by the card-punch combinations and 
internal bit configurations listed in Appendix A. In addition, any of the 
256 punch combinations may be designated anywhere that characters may 
appear between paired apostrophes, in comments, and in macro instruction 
operands. 

ASSEMBLER LANGUAGE STRUCTURE 

The basic structure of the language can be stated as follows: 

A source statement is composed of: 

• A name entry (usually optional) . 

• An operation entry (required) 

• An operand entry (usually required) . 

• Comments entry (optional) . 
A name entry is: 

• A symbol. 

An operation entry is: 

• A mnemonic operation code representing a machine, assembler, or 
macro instruction. 

An operand entry is: 
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• One or more operands composed of one or more expressions, which , 
in turn, are composed of a term or an arithmetic combination of 
terms • 

Operands of machine instructions generally represent such things as 
storage locations, general registers, immediate data, or constant values. 
Operands of assembler instructions provide the information needed by the 
assembler program to perform the designated operation. 

Figure 2-3 depicts this structure. Terms shown in Figure 2-3 are 
classed as absolute or relocatable, depending on the effect of program 
relocation upon them. Program relocation is the loading of the object 
program into storage locations other than those originally assigned by the 
assembler. A term is absolute if its value does not change upon 
relocation. A term is relocatable if its value changes upon relocation. 

The following subsection "Terms and Expressions" discusses these items 
as outlined in Figure 2-3. 

TERMS AND EXPRESSIONS 

TERMS 

Every term represents a value. This value may be assigned by the 
assembler (symbols, symbol length attribute, location counter reference) or 
may be inherent in the term itself (self-defining term, literal) . 

An arithemtic combination of terms is reduced to a single value by the 
assembler* 

The following material discusses each type of term and the rules for 
its use. 

Symbols 

A symbol is a character or combination of characters used to represent 
locations or arbitrary values. Symbols, through their use in name fields 
and in operands, provide the programmer with an efficient way to name and 
reference a program element. There are three types of symbols: 

1. Ordinary symbols. 

2. Variable symbols. 

3. Sequence symbols. 

Ordinary symbols , created by the progranmer for use as a name entry 
and/or an operand, must conform to these rules: 
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Figure 2-3. Aasenbler Language Structure ~ Machine and Assembler Instructions 
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1. The symbol must not consist of more than eight characters. The 
first character must be a letter. The other characters may be 
letters, digits, or a combination of the two. 

2. No special characters may be included in a symbol. 

3. No blanks are allowed in a symbol. 

In the following sections, the term symbol refers to ordinary symbol. 

The following are valid symbols: 

READER L00P2 @B4 
A23456 N $A1 
X4F2 84 #56 

The following symbols are invalid, for the reasons noted: 

256B (first character is not alphabetic) 

REC0RDAREA2 (more than eight characters) 

BCD*34 (contains a special character - *) 

IN AREA (contains a blank) 

Variable symbols must begin with an ampersand (&) followed by one to 
seven letters and/or numbers, the first of which must be a letter. 
Variable symbols are used within the source program or macro definition to 
allow different values to be assigned to one symbol. A complete discussion 
of variable symbols appears in Section 6. 

Sequence symbols consist of a period (.) followed by one to seven 
letters and/or numbers, the first of which must be a letter. Sequence 
symbols are used to indicate the position of statements within the source 
program or macro definition. Through their use the programmer can vary the 
sequence in which statements are processed by the assembler program. (See 
the complete discussion in Section 6.) 

NOTE: Sequence symbols and variable symbols are used only for the macro 
language and conditional assembly. Programmers who do not use these 
features need not be concerned with these symbols. 

DEFINING SYMBOLS : The assembler assigns a value to each symbol appearing 
as a name entry in a source statement. The values assigned to symbols 
naming storage areas, instructions, constants, and control sections are the 
addresses of the leftmost bytes of the storage fields containing the named 
items. Since the addresses of these items may change upon program 
relocation, the symbols naming them are considered relocatable terms. 

A symbol used as a name entry in the Equate Symbol (EQU) assembler 
instruction is assigned the value designated in the operand entry of the 
instruction. Since the operand entry may represent a relocatable value or 
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an absolute (i.e., nonchanging) value, the symbol is considered a 
relocatable term or an absolute term, depending upon' the value it is 
equated to. 

The value of a symbol may not be negative and may not exceed 2^'*-l. 

A symbol is said to be defined when it appears as the name of a source 
statement. (A special case of symbol definition is discussed in Section 3, 
under "Program Sectioning and Linking.") 

Symbol definition also involves the assignment of a length attribute 
to the symbol. (The assembler maintains an internal table - the symbol 
table - in which the values and attributes of symbols are kept. When the 
assembler encounters a symbol in an operand, it refers to the table for the 
values associated with the symbol.) The length attribute of a symbol is 
the length, in bytes, of the storage field whose address is represented by 
the symbol. For example, a symbol naming an instruction that occupies four 
bytes of storage has a length attribute of 4. Note that there are 
exceptions to this rule; for example, in the case where a symbol has been 
defined by an equate to location counter value (EQU *) or to a self- 
defining term, the length attribute of the symbol is 1. These and other 
exceptions are noted under the instructions involved. The length attribute 
is never affected by a duplication factor. 

PREVIOUSLY DEFINED SYMBOLS ; Some instructions require that a symbol 
appearing in the operand entry be previously defined. This simply means 
that the symbol, before its use in an operand, must have appeared as a name 
entry in a prior statement. 

GENERAL RESTRICTIONS ON SYMBOLS ; A symbol may be defined only once in an 
assembly. That is, each symbol used as the name of a statement must be 
unique within that assembly. However, a symbol may be used in the name 
field more than once as a control section name (i.e., defined in the START, 
CSECT, or DSECT assembler statements described in Section 3) because the 
coding of a control section may be suspended and then resumed at any 
subsequent point. The CSECT or DSECT statement that resumes the section 
must be named by the same symbol that initially named the section; thus, 
the symbol that names the section must be repeated. Such usage is not 
considered to be duplication of a symbol definition. 

Self -Defining Terms 

A self-defining term is one whose value is inherent in the term. It 
is not assigned a value by the assembler. For example, the decimal self- 
defining term - 15 - represents a value of 15. The length attribute of a 
self -defining term is always 1. 

There are four types of self -defining terms: decimal, hexadecimal, 
binary, and character. Use of these terms is spoken of as decimal. 
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hexadecimal, binary, or character representation of the machine-language 
binary value or bit configuration they represent. 

Self -defining terms are classed as absolute terms, since the values 
they represent do not change upon program relocation. 

USING SELF-DEFINING TERMS ; Self -defining terms are the means of specifying 
machine values or bit configurations without equating the values to symbols 
and using the symbols. 

Self -defining terms may be used to specify such program elements as 
immediate data, masks, registers, addresses, and address increments. The 
type of term selected (decimal, hexadecimal, binary, or character) will 
depend on what is being specified. 

The use of a self -defining term is quite distinct from the use of data 
constants or literals. When a self -defining term is used in a machine- 
instruction statement, its value is assembled into the instruction. When 
a data constant is referred to or a literal is specified in the operand of 
an instruction, its address is assembled into the instruction. Self- 
defining terms are always right-justified; truncation or padding with zeros 
if necessary occurs on the left. 

Decimal Self -Defining Term ; A decimal self-defining term is simply an 
unsigned decimal number written as a sequence of decimal digits. High- 
order zeros may be used (e.g., 007). Limitations on the value of the term 
depend on its use. For example, a decimal term that designates a general 
register should have a value between and 13; one that represents an 
address should not exceed the size of storage. In any case, a decimal term 
may not consist of more than eight digits, or exceed 16,777,215 (Z^'^-l) . 
A decimal self -defining term is assembled as its binary equivalent. Some 
examples of decimal self -defining terms are: 8, 147, 4092, and 00021. 

Hexadecimal Self -Defining Term : A hexadecimal self -defining term consists 
of one to six hexadecimal digits enclosed by apostrophes and preceded by 
the letter X: X*C49'. 

Each hexadecimal digit is assembled as its four-bit binary equivalent. 
Thus, a hexadecimal term used to represent an eight-bit mask would consist 
of two hexadecimal digits. The maximum value of a hexadecimal term is: 
X»FFFFFF' . 

The hexadecimal digits and their bit patterns are as follows: 

0- 0000 4- 0100 8- 1000 C- 1100 

1- 0001 5- 0101 9- 1001 D- 1101 

2- 0010 6- 0110 A- 1010 E- 1110 

3- 0011 7- 0111 B- 1011 F- 1111 
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A table for converting from hexadecimal representation to decimal 
representation is provided in Appendix B. 

Binary Self -Defining Term : A binary self -defining term is written as an 
unsigned sequence of Is and Os enclosed in apostrophes and preceded by the 
letter B, as follows: B' 10001101', This term would appear in storage as 
shown, occupying one byte. A binary term may have up to 24 bits 
represented. 

Binary representation is used primarily in designated bit patterns of 
masks or in logical operations. 

The following example illustrates a binary term used as a mask in a 
Test Under Mask (TM) instruction. The contents of GAMMA are to be tested, 
bit by bit, against the pattern of bits represented by the binary term. 



Name 


Operation 


Operand 


ALPHA 


TM 


GAMMA.B' 10101101' 



Character Self-Defining Term : A character self -defining term consists of 
one to three characters enclosed by apostrophes. It must be preceded by 
the letter C. All letters, decimal digits, and special characters may be 
used in a character term. In addition, any of the remainder of the 256 
punch combinations may be designated in a character self-defining term. 
Examples of character self -defining terms are as follows: 

C'/' C ' (blank) 
C'ABC C'13' 

Because of the use of apostrophes in the assembler language and 
ampersands in the macro language as syntactic characters, the following 
rule must be observed when using these characters in a character term. 

For each apostrophe or ampersand desired in a character self -defining 

term, two apostrophes or ampersands must be written. For example, the 

character value A'# would be written as 'A''#', while an apostrophe 

followed by a blank and another single apostrophe would be written as ' * ' 
1 1 f 

Each character in the character sequence is assembled as its eight-bit 
code equivalent (see Appendix A) . The two apostrophes or ampersands that 
must be used to represent an apostrophe or ampersand within the character 
sequence are assembled as an apostrophe or ampersand. 
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Location Counter Reference 

The Location Counter : A location counter is used to assign storage 
addresses to program statements. It is the assembler's equivalent of the 
instruction counter in the computer. As each machine instruction or data 
area is assembled, the location counter is first adjusted to the proper 
boundary for the item, if adjustment is necessary, and then incremented by 
the length of the assembled item. Thus, it always points to the next 
available location. If the statement is named by a symbol, the value 
attribute of the symbol is the value of the location counter after boundary 
adjustment, but before addition of the length. 

The assembler maintains a location counter for each control section of 
the program and manipulates each location counter as previously described. 
Source statements for each section are assigned addresses from the location 
counter for that section. The location counter for each successively 
declared control section assigns locations in consecutively higher areas of 
storage. Thus, if a program has multiple control sections, all statements 
identified as belonging to the first control section will be assigned from 
the location counter for section 1, the statements for the second control 
section will be assigned from the location counter for section 2, etc* 
This procedure is followed whether the statements from different control 
sections are interspersed or written in control section sequence. 

The location counter setting can be controlled by using the START and 
ORG assembler instructions, which are described in Sections 3 and 5. The 
counter affected by either of these assembler instructions is the counter 
for the control section in which they appear. The maximum value for the 
location counter is 2^^-l. 

The programmer may refer to the current value of the location counter 
at any place in a program by using an asterisk as a term in an operand. 
The asterisk represents the location of the first byte of currently 
available storage (i.e., after any required boundary adjustment). Using an 
asterisk as the operand in a machine-instruction statement is the same as 
placing a symbol in the name field of the statement and then using that 
symbol as an operand of the statement. Because a location counter is 
maintained for each control section, a location counter reference 
designates the location counter for the section in which the reference 
appears . 

A reference to the location counter may be made in a literal address 
constant (i.e., the asterisk may be used in an address constant specified 
in literal form) . The address of the instruction containing the literal is 
used for the value of the location counter. A location counter reference 
may not be used in a statement which requires the use of a predefined 
symbol, with the exception of the EQU and ORG assembler instructions. 



2-13 



Literals 

A literal term Is one of three basic ways to introduce data into a 
program. It is simply a constant preceded by an equal sign («) . 

A literal represents data rather than a reference to data. The 
appearance of a literal in a statement directs the assembler program to 
assemble the data specified by the literal, store this data in a "literal 
pool," and place the address of the storage field containing the data in 
the operand field of the assembled statement. 

Literals provide a means of entering constants (such as numbers for 
calculation, addresses, indexing factors, or words or phrases for printing 
out a message) into a program by specifying the constant in the operand of 
the instruction in which it is used. This is in contrast to using the DC 
assembler instruction to enter the data into the program and then using the 
name of the DC instruction in the operand. Only one literal is allowed in 
a machine-instruction statement. 

A literal term cannot be combined with any other terms. 

A literal cannot be used as the receiving field of an instruction that 
modifies storage. 

A literal cannot be specified in a shift instruction or an I/O 
instruction (HID, HDV, TIO, SIO, SIOF) . 

When a literal is contained in an instruction, it cannot specify an 
explicit base register or an explicit index register. 

A literal cannot be specified in an address constant (see Section 5, 
"DC — Define Constant") . 

The instruction coded below shows one use of a literal. 



Name 


Operation 


Operand 


GAMM 


L 


10,=F'274' 



The statement GAMMA is a load instruction using a literal as the 
second operand. When assembled, the second operand of the instruction will 
be the address at which the value F'274' is stored. 

NOTE: If a literal operand is a self -defining term (X, C, B, or decimal) 
and the equal sign (=) is omitted, the statement may assemble without error 
(see "Using Self -Defining Terms") . 

In general, literals can be used wherever a storage address is 
permitted as an operand. They cannot, however, be used in any assembler 
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Instruction that requires the use of a previously defined symbol. Literals 
are considered relocatable, because the address of the literal, rather than 
the literal itself, will be assembled in the statement that employs a 
literal. The assembler generates the literals, collects them, and places 
them in a specific area of storage, as explained in the subsection "The 
Literal Pool." A literal is not to be confused with the immediate data in 
an SI instruction. Immediate data is assembled into the instruction. 

Literal Format : The assembler requires a description of the type of 
literal being specified as well as the literal itself. This descriptive 
information assists the assembler in assembling the literal correctly. The 
descriptive portion of the literal must indicate the format of the 
constant. It may also specify the length of the constant. 

The method of describing and specifying a constant as a literal is 
nearly identical to the method of specifying it in the operand of a DC 
assembler instruction. The major difference is that the literal must start 
with an equal sign (■), which indicates to the assembler that a literal 
follows. The reader is referred to the discussion of the DC assembler 
instruction operand format (Section 5) for the means of specifying a 
literal. The type of literal designated in an instruction is not checked 
for correspondence with the operation code of the instruction. 

Some examples of literals are: 

»A(BETA) — address constant literal. 

=F'1234' — a fixed-point number with a length of four bytes. 

»C*ABC' — a character literal. 

The Literal Pool : The literals processed by the assembler are collected 
and placed in a special area called the literal pool, and the location of 
the literal, rather than the literal itself, is assembled in the statement 
employing a literal. The positioning of the literal pool may be controlled 
by the programmer, if he so desires. Unless otherwise specified, the 
literal pool is placed at the end of the first control section. 

The programmer may also specify that multiple literal pools be 
created. However, the sequence in which literals are ordered within the 
pool is controlled by the assembler. Further information on positioning 
the literal pool(s) is in Section 5 under "LTORG— Begin Literal Pool." 

Symbol Length Attribute Reference 

The length attribute of a symbol may be used as a term. Reference to 
the attribute is made by coding L' followed by the symbol, as in: 

L'BETA 

The length attribute of BETA will be substituted for the term. The 
use of the length attribute of a symbol defined with a DC or DS with 
explicit length given by an expression is invalid. The following example 
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illustrates the use of L' symbol in moving a character constant into either 
the high-order or low-order end of a storage field. 

For ease in following the example, the length attributes of Al and B2 
are mentioned. However, keep in mind that the L' symbol term makes coding 
such as this possible in situations where lengths are unknown. 



Name 


Operation 


Operand 


Al 
B2 

HIORD 
LOORD 


DS 
DC 
MVC 
MVC 


CL8 

CL2'AB' 

Al (L'B2),B2 

A1+L'A1-L'B2(L'B2),B2 



Al names a storage field eight bytes in length and is assigned a 
length attribute of 8. B2 names a character constant two bytes in length 
and is assigned a length attribute of 2. The statement named HIORD moves 
the contents of B2 into the leftmost two bytes of Al. The term L'B2 in 
parentheses provides the length specification required by the instruction. 
When the instruction is assembled, the length is placed in the proper field 
of the machine instruction. 

The statement named LOORD moves the contents of B2 into the rightmost 
two bytes of Al. The combination of terms A1+L*A1-L'B2 results in the 
addition of the length of Al to the beginning address of Al, and the 
subtraction of the length of B2 from this value. The result is the address 
of the seventh byte in field Al. The constant represented by B2 is moved 
into Al starting at this address. L*B2 in parentheses provides length 
specification as in HIORD. 

Note: As previously stated, the length attribute of * is equal to the 
length of the instruction in which it appears, except in an EQU to *, in 
which case the length attribute is 1. 

Terms in Parentheses 

Terms in parentheses are reduced to a single value; thus, the terms in 
parentheses, in effect, become a single term. 

Arithmetically combined terms, enclosed in parentheses, may be used in 
combination with terms outside the parentheses, as follows: 

14+BETA- (GAMMA-LAMBDA) 

When the assembler program encounters terms in parentheses in combina- 
tion with other terms, it first reduces the combination of terms inside the 
parentheses to a single value which may be absolute or relocatable, depend- 
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ing on the combination of terms. This value then is used in reducing the 
rest of the combination to another single value. 

Terms in parentheses may be included within a set of terms in 
parentheses: 

A+B-(C+D-(E+F)+10) 

The innermost set of terms in parentheses is evaluated first. Five 
levels of parentheses are allowed; a level of parentheses is a left 
parenthesis and its corresponding right parenthesis. Parentheses which 
occur as part of an operand format do not count in this limit. An 
arithmetic combination of terms is evaluated as described in the next 
section "Expressions." 

EXPRESSIONS 

This subsection discusses the expressions used in coding operand 
entries for source statements. Two types of expressions, absolute and 
relocatable, are presented along with the rules for determining these 
attributes of an expression. 

As shown in Figure 2-3, an expression is composed of a single term or 
an arithmetic combination of terms. The following are examples of valid 
expressions : 



* 


BETA*10 


AREA1+X'2D' 


B'lOl' 


*+32 


C'ABC* 


N-25 


29 


FIELIM-332 


L' FIELD 


FIELD 


LAMBDA+GAMMA 



(EXIT-ENTRY+1)+G0 TEN/TWO 

-F'1234* 

ALPHA-BETA/ (l(>fAREA*L ' FIELD) -100 

The rules for coding expressions are: 

1. An expression cannot start with an arithmetic operator, (+-/*). 
Therefore, the expression -A+BETA is invalid. However, the ex- 
pression 0-A+BETA is valid. 

2. An expression cannot contain two terms or two operators in 
succession. 

3. An expression cannot consist of more than 16 terms. 

4. An expression cannot have more than five levels of parentheses. 

5. A multiterm expression cannot contain a literal. 
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Evaluation of Expressions 

A single-term expression, e.g., 29, BETA, *, L*SYMBOL, takes on the 
value of the term involved. 

A multiterm expression, e.g., BETA+10, ENTRY-EXIT, 25*10+A/B, is 
reduced to a single value , as follows : 

1. Each term is evaluated. 

2. Every expression is computed to 32 bits, and then truncated to 
the rightmost 24 bits. 

3. Arithmetic operations are performed from left to right except 
that multiplication and division are done before addition and 
subtraction, e.g., A+B*C is evaluated as A+(B*C) , not (A+B)*C. 
The computed result is the value of the expression. 

4. Division always yields an integer result; any fractional portion 
of the result is dropped. E.g., 1/2*10 yields a zero result, 
whereas 10*1/2 yields 5. 

5. Division by zero is permitted and yields a zero result. 

Parenthesized multiterm subexpressions are processed before the rest 
of the terms in the expression, e.g., in the expression A+BETA*(CON-10) , 
the term CON-10 is evaluated first and the resulting value is used in 
computing the final value of the expression. 

Negative values are carried in twos complement form. Final values of 
expressions are the rightmost 24 bits of the results. Intermediate results 
have a range of -2^^ through 2^^-l. However, the value of an expression be- 
fore truncation must be in the range -2^^ through 2^^-l or the results will 
be meaningless. A negative result is considered to be a 3-byte positive 
value . 

NOTE: In A-type address constants, the full 32-bit final expression result 
is truncated on the left to fit the specified or implied length of the 
constant. 

Absolute and Relocatable Expressions 

An expression is called absolute if its value is unaffected by program 
relocation. 

An expression is called relocatable if its value depends upon program 
relocation. 

The two types of expressions, absolute and relocatable, take on these 
characteristics from the term or terms composing them. 
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Absolute Expression ; An absolute expression can be an absolute term or any 
arithmetic combination of absolute terms. An absolute term can be a non- 
relocatable symbol, any of the self -defining terms, or the length attribute 
reference. As indicated in Figure 2-3, all arithmetic operations are 
permitted between absolute terms. 

An expression is absolute, even though it may contain relocatable 
terms (RT) — alone or in combination with absolute terms AT — under the 
following conditions. 

1. There must be an even number of relocatable terms in the ex- 
pression. 

2. The relocatable terms must be paired. Each pair of terms must 
have the same relocatability, i.e., they appear in the same con- 
trol section in this assembly (see "Program Sectioning and Link- 

" ing," Section 3). Each pair must consist of terms with opposite 
signs. The paired terms do not have to be contiguous, e.g., 
RT+AT-RT. 

3. No relocatable term can enter into a multiply or divide opera- 
tion. Thus, RT-RTnO is invalid. However, (RT-RT)*10 is valid. 

The pairing of relocatable terms (with opposite signs and the same 
relocatability) cancels the effect of relocation since both symbols would 
be relocated by the same amount. Therefore the value represented by the 
paired terms remains constant, regardless of program relocation. For 
example, in the absolute expression A-Y+X, A is an absolute term, and X and 
Y are relocatable terms with the same relocatability. If A equals 50, Y 
equals 25, and X equals 10, the value of the expression would be 35. If X 
and Y are relocated by a factor of 100 their values would then be 125 and 
110. However, the expression would still evaluate as 35 (50-125+110*35). 

An absolute expression reduces to a single absolute value* 

The following examples illustrate absolute expressions. A is an abso- 
lute term; X and Y are relocatable terms with the same relocatability. 

A-Y+X 

A 

A*A 

X-Y+A 

*-Y (a reference to the location counter must be paired with another 

relocatable term from the same control section, i.e., with the 

same relocatability) 

Relocatable Expressions ; A relocatable expression is one whose value 
changes by n if the program in which it appears is relocated n bytes away 
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from its originally assigned area of storage. All relocatable expressions 
must have a positive value. 

A relocatable expression can be a relocatable term. A relocatable 
expression can contain relocatable terms — alone or in combination with 
absolute terms — under the following conditions: 

1. There must be an odd number of relocatable terms. 

2. All the relocatable terms but one must be paired. Pairing is 
described in Absolute Expression . 

3. The unpaired term must not be directly preceded by a minus sign. 

4. No relocatable term can enter into a multiply or divide 
operation. 

A relocatable expression reduces to a single relocatable value. This 
value is the value of the odd relocatable term, adjusted by the values 
represented by the absolute terms and/or paired relocatable terms 
associated with it. The relocatability attribute is that of the odd 
relocatable term. 

For example, in the expression W-X+W-10, W and X are relocatable terms 
with the same relocatability attribute. If initially W equals 10 and X 
equals 5, the value of the expression is 5. However, upon relocation this 
value will change. If a relocation factor of 100 is applied, the value of 
the expression is 105. Note that the value of the paired terms, W-X, 
remains constant at 5 regardless of relocation. Thus, the new value of the 
expression, 105, is the result of the value of the odd term (W) adjusted by 
the values of W-X and 10. 

The following examples illustrate relocatable expressions. A is an 

absolute term, W and X are relocatable terms with the same relocatability 

attribute, Y is a relocatable term with a different relocatability attri- 
bute. 

Y-32*A W-X+* =F ' 1234 ' (literal) 
W-X+Y A*A+W-W+Y 

* (reference to Y 
location counter) 
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SECTION 3; ADDRESSING — PROGRAM SECTIONING AND LINKING 
ADDRESSING 

The IBM HTC addressing technique requires the use of a base register, 
which contains the base address, and a displacement, which is added to the 
contents of the base register. The programmer may specify a symbolic 
address and request the assembler to determine its storage address composed 
of a base register and a displacement. The programmer may rely on the 
assembler to perform this service for him by indicating which general 
registers are available for assignment and what values the assembler may 
assume each contains. The programmer may use as many or as few registers 
for this purpose as he desires. The only requirement is that, at the point 
of reference, a register containing an address from the same control 
section is available, and that this address is less than or equal to the 
address of the item to which the reference is being made. The difference 
between the two addresses may not exceed 4095 bytes. 

ADDRESSES ~ EXPLICIT AND IMPLIED 

An address is composed of a displacement plus the contents of a base 
register. (In the case of RX instructions, the contents of an index 
register are also used to derive the address in the machine.) 

The programmer writes an explicit address by specifying the 
displacement and the base register number. In designating explicit 
addresses a base register may not be combined with a relocatable symbol. 

He writes an implied address by specifying an absolute or relocatable 
address. The assembler has the facility to select a base register and 
compute a displacement, thereby generating an explicit address from an 
implied address, provided that it has been informed (1) what base registers 
are available to it and (2) what each contains. The programmer conveys 
this information to the assembler through the USING and DROP assembler 
instructions. 

BASE REGISTER INSTRUCTIONS 

The USING and DROP assembler instructions enable programmers to use 
expressions representing implied addresses as operands of machine- 
instruction statements, leaving the assignment of base registers and the 
calculation of displacements to the assembler. 

In order to use symbols in the operand field of machine-instruction 
statements, the programmer must (1) indicate to the assembler, by means of 
a USING statement, that one or more general registers are available for use 
as base registers, (2) specify, by means of the USING statement, what value 
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each base register contains, and (3) load each base register with the value 
he has specified for It. 

Having the assembler determine base registers and displacements 
relieves the programmer of separating each address Into a displacement 
value and a base address value. This feature of the assembler will 
eliminate a likely source of programming errors, thus reducing the time 
required to check out prograins. To take advantage of this feature, the 
programmer uses the USING and DROP instructions described in this 
subsection. The principal discussion of this feature follows the 
description of both instructions. 

USING — Use Base Address Register 

The USING instruction indicates that one or more general registers are 
available for use as base registers. This instruction also states the base 
address values that the assembler may assume will be in the registers at 
object time. Note that a USING instruction does not load the registers 
specified. It is the programmer's responsibility to see that the specified 
base address values are placed into the registers. Suggested loading 
methods are described in the subsection "Programming with the USING 
Instruction." A reference to any name in a control section cannot occur in 
a machine instruction or an S-type address constant before the USING 
statement that makes that name addressable. The format of the USING 
instruction statement is: 



Name 


Operation 


Operand 


A se- 


USING 


From 2-17 expressions 


quence 




of the form v,rl. 


symbol 




r2,r3, . . . ,rl6 


or 






blank 







Operand v must be an absolute or relocatable expression. It may be a 
negative number whose absolute value does not exceed 2^^. No literals are 
permitted. Operand v specifies a value that the assembler can use as a 
base address. The other operands must be absolute expressions. The 
operand rl specifies the general register that can be assumed to contain 
the base address represented by operand v. Operands r2, r3, r4, . . . 
specify registers that can be assumed to contain v-f4096, v+8192, v+12288, 
., respectively. The values of the operands rl, r2, r3, . . . , rl6 
must be between and 15. For example, the statement: 



3-2 



Name 


Operation 


Operand 




USING 

. 


*,12,13 



tells the assembler it may assume that the current value of the location 
counter will be in general register 12 at object time, and that the current 
value of the location counter, incremented by 4096, will be in general 
register 13 at object time. 

If the programmer changes the value in a base register currently being 
used, and wishes the assembler to compute displacement from this value, the 
assembler must be told the new value by means of another USING statement. 
In the following sequence the assembler first assumes that the value of 
ALPHA is in register 9. The second statement then causes the assembler to 
assume that ALPHA+1000 is the value in register 9. 



Name 


Operation 


Operand 




USING 
• 
• 

USING 
J 


ALPHA, 9 
ALPHA+1000, 9 



If the programmer has to refer to the first 4096 bytes of storage, he 
can use general register as a base register subject to the following 
conditions: 

1. The value of operand v must be either absolute or relocatable 
zero or simply relocatable* 

2. Register must be specified as operand rl. 

The assembler assumes that register contains zero. Therefore, 
regardless of the value of operand v, it calculates displacements as if 
operand v were absolute or relocatable zero. The assembler also assumes 
that subsequent registers specified in the same USING statement contain 
4096, 8192, etc. 

NOTE: If register is used as a base register, the program is not 
relocatable, despite the fact that operand v may be relocatable. The 
program can be made relocatable by: 

1. Replacing register in the USING statement. 

2. Loading the new register with a relocatable value. 
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3. Reassembling the program. 

DROP — Drop Base Register 

The DROP instruction specifies a previously available register that 
may no longer be used as a base register. The format of the DROP 
instruction statement is as follows: 



Name 


Operation 


Operand 


A se- 
quence 
symbol 
or 
blank 


DROP 


Up to 16 absolute 
expressions of the 
form rl, r2, 
r3,. . . ,rl6 



The expressions indicate general registers previously named in a USING 
statement that are now unavailable for base addressing. The following 
statement, for example, prevents the assembler from using registers 7 and 
11: 



Name 


Operation 


Operand 




DROP 


7,11 



It is not necessary to use a DROP statement when the base address 
being used is changed by a USING statement; nor are DROP statements needed 
at the end of the source program. 

A register made unavailable by a DROP instruction can be made 
available again by a subsequent USING instruction. 

PROGRAMMING WITH THE USING INSTRUCTION 

The USING (and DROP) instructions may be used anywhere in a program, 
as often as needed, to indicate the general registers that are available 
for use as base registers and the base address values the assembler may 
assume each contains at execution time. Whenever an address is specified 
in a machine- instruction statement, the assembler determines whether there 
is an available register containing a suitable base address. A register is 
considered available for a relocatable address if it was specified in a 
USING instruction to have a relocatable value. A register with an absolute 
value is available only for absolute addresses. In either case, the base 
address is considered suitable only if it is less than or equal to the 
address of the item to which the reference is made. The difference between 
the two addresses may not exceed 4095 bytes. In calculating the base 
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register to be used, the assembler will always use the available register 
giving the smallest displacement. If there are two registers with the same 
value, the highest numbered register will be chosen. 



Name 


Operation 


Operand 


BEGIN 
FIRST 

LAST 


BALR 
USING 

END 


2,0 
*.2 

BEGIN 



In the preceding sequence, the BALR instruction loads register 2 with 
the address of the first storage location immediately following. In this 
case, it is the address of the instruction named FIRST. The USING 
instruction indicates to the assembler that register 2 contains 
location. When employing this method, the USING instruction 
immediately follow the BALR instruction. No other USING or 



instructions 
of FIRST. 



this 
must 
load 



are required if the location named LAST is within 4095 bytes 



In Figure 3-1, the BALR and LM instructions load registers 2-5. The 
USING instruction indicates to the assembler that these registers are 
available as base registers for addressing a maximum of 16,384 consecutive 
bytes of storage, beginning with the location named HERE. The number of 
addressable bytes may be increased or decreased by altering the number of 
registers designated by the USING and LM instructions and the number of 
address constants specified in the DC instruction. 



Name 


Operation 


Operand 


BEGIN 

HERE 

BASEADDR 
FIRST 

LAST 


BALR 

USING 

LM 

B 

DC 

• 

END 


2.0 

HERE, 2,3,4,5 

3, 5, BASEADDR 

FIRST 

A (HERE+4096 , HERE+8192 , HERE+12288 ) 

BEGIN 



Figure 3-1. Multiple Base Register Assignment 
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RELATIVE ADDRESSING 

Relative addressing is the technique of addressing instructions and 
data areas by designating their location in relation to the location 
counter or to some symbolic location. This type of addressing is always in 
bytes, never in bits, words, or instructions. Thus, the expression *+4 
specifies an address that is four bytes greater than the current value of 
the location counter. In the sequence of instructions shown in the 
following example, the location of the CR machine instruction can be 
expressed in two ways, ALPHA+2 or BETA-4, because all of the mnemonics in 
the example are for 2-byte instructions in the RR format. 



Name 


Operation 


Operand 


ALPHA 
BETA 


LR 
CR 
BCR 
AR 


3,4 
4,6 
1,14 
2,3 



PROGRAM SECTIONING AND LINKING 

It is often convenient, or necessary, to write a large program in 
sections. The sections may be assembled separately, then combined into one 
object program. The assembler provides facilities for creating 
multisectioned programs and symbolically linking separately assembled 
programs or program sections. 

Sectioning a program is optional, and many programs can best be 
written without sectioning them. The programmer writing an unsectioned 
program need not concern himself with the subsequent discussion of program 
sections, which are called control sections. He need not employ the CSECT 
instruction, which is used to identify the control sections of a 
multisection program. Similarly, he need not concern himself with the 
discussion of symbolic linkages if his program neither requires a linkage 
to nor receives a linkage from another program. He may, however, wish to 
identify the program and/or specify a tentative starting location for it, 
both of which may be done by using the START instruction. He may also want 
to employ the dummy section feature obtained by using the DSECT 
instruction. 



NOTE: 



Program sectioning and linking is closely related to 



the 



specification of base registers for each control section. Sectioning and 
linking examples are provided under the heading "Addressing External 
Control Sections." 
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CONTROL SECTIONS 

The concept of program sectioning is a consideration at coding time, 
assembly time, and load time. To the programmer, a program is a logical 
unit. He may want to divide it into sections called control sections; if 
so, he writes it in such a way that control passes properly from one 
section to another regardless of the relative physical position of the 
sections in storage. A control section is a block of coding that can be 
relocated, independently of other coding, at load time without altering or 
impairing the operating logic of the program. It is noinnally identified by 
the CSECT instruction. However, if it is desired to specify a tentative 
starting location, the START instruction may be used to identify the first 
control section. 

To the assembler, there is no such thing as a program; instead, there 
is an assembly, which consists of one or more control sections. (However, 
the terms assembly and program are often used interchangeably. ) An 
unsectioned program is treated as a single control section. To the linkage 
editor, there are no programs, only control sections that must be fashioned 
into a load module. 

The output from the assembler is called an object module. It contains 
data requited for linkage editor processing. The external symbol 
dictionary, which is part of the object module, contains information the 
linkage editor needs in order to complete cross-referencing between control 
sections as it combines them into an object program. The linkage editor 
can take control sections from various assemblies and combine them properly 
with the help of the corresponding control dictionaries. Successful 
combination of separately assembled control sections depends on the 
techniques used to provide symbolic linkages between the control sections. 

Whether the programmer writes an unsectioned program, a multisection 
program, or part of a multisection program, he still knows what eventually 
will be entered into storage because he has described storage symbolically. 
He may not know where each section appears in storage, but he does know 
what storage contains. There is no constant relationship between control 
sections. Thus, knowing the location of one control section does not make 
another control section addressable by relative addressing techniques. 

The programmer must be aware that there is a limit to external symbol 
dictionary entries. The total number of control sections, dummy sections, 
unique symbols in EXTRN and WXTRN statements, V-type address constants, and 
external dummy sections must not exceed 255. Certain constants may cause 
a symbol to be counted twice: e.g., external symbols in V-type address 
constants (unless they are explicitly defined in an EXTRN or WXTRN 
statement) , and external dummy sections implicitly defined by Q-type 
address constants and corresponding DSECT statements. EXTRN and WXTRN 
statements are described in this section; V-type and Q-type constants in 
Section 5 under "Operand Subfield 4: Constant." 
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Control Section Location Assignment 

Control sections can be intermixed because the assembler provides a 
location counter for each control section. Locations are assigned to 
control sections as if the sections are placed in storage consecutively, in 
the same order as they first occur in the program. Each control section 
subsequent to the first begins at the next available double-word boundary. 

FIRST CONTROL SECTION 

The first control section of a program has the following special 
properties: 

1 . Its initial location counter value may be specified as an 
absolute value, if the START instruction is used. 

2. It contains the literals of the program, unless their positioning 
has been altered by LTORG statements. 

START — Start Assembly 

The START instruction may be used to give a name to the first (or 
only) control section of a program. It may also be used to specify an 
initial location counter value for the first control section of the 
program. The format of the START instruction statement is as follows: 



Name 


Operation 


Operand 


Any 
symbol 
or blank 


START 


A self-defining 
term, or blank 



If a symbol names the START instruction, the symbol is established as 
the name of the control section. If not, the control section is considered 
to be unnamed. All subsequent statements are assembled as part of that 
control section. This continues until a CSECT instruction identifying a 
different control section or a DSECT instruction is encountered. A CSECT 
instruction named by the same symbol that names a START instruction is 
considered to identify the continuation of the control section first 
identified by the START. Similarly, an unnamed CSECT that occurs in a 
program initiated by an unnamed START is considered to identify the 
continuation of the unnamed control section. 

The symbol in the name field is a valid relocatable symbol whose value 
represents the address of the first byte of the control section. It has a 
length attribute of 1. 
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The assembler uses the self -defining term specified by the operand as 
the initial location counter value of the program. This value should be 
divisible by eight. For example, either of the following statements could 
be used to assign the name PR0G2 to the first control section and to 
indicate an initial assembly location counter value of 2040. If the 
operand is omitted, the assembler sets the initial location counter value 
of the program at zero. The location counter is set at the next doubleword 
boundary when the value of the START operand is not divisible by eight. 



Name 


Operation 


Operand 


PR0G2 
PR0G2 


START 
START 


2040 
X'7F8' 



Note: The START instruction must not be preceded by any code that will 
cause an unnamed control section to be assembled. (See "Unnamed First 
Control Section" below.) 

CSECT " Identify Control Section 

The CSECT instruction identifies the beginning or the continuation of 
a control section. The format of the CSECT instruction statement is as 
follows: 



Name 


Operation 


Operand 


Any 
symbol 
or blank 


CSECT 


Not used; should 
be blank 



If a symbol names the CSECT instruction, the symbol is established as 
the name of the control section; otherwise the section is considered to be 
unnamed. All statements following the CSECT are assembled as part of that 
control section until a statement identifying a different control section 
is encountered (i.e., another CSECT or a DSECT instruction). 

The symbol in the name field is a valid relocatable symbol whose value 
represents the address of the first byte of the control section. It has a 
length attribute of 1. 

Several CSECT statements with the same name may appear within a 
program. The first is considered to identify the beginning of the control 
section; the rest identify the resumption of the section. Thus, statements 
from different control sections may be interspersed. They are properly 
assembled (assigned contiguous storage locations) as long as the statements 
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from the various control sections are identified by the appropriate CSECT 
instructions. 

Unnamed First Control Section 

All machine instructions and many assembler instructions have to 
belong to a control section. If such an instruction precedes the first 
CSECT instruction, the assembler will consider it to belong to an unnamed 
control section (also referred to as private code), which will be the first 
(or only) control section in the module. 

The following instructions will not cause this to happen, since they 
do not have to belong to a control section: 

Common Control Sections 

Dummy Control Sections 

Macro Definitions 

Conditional Assembly Instructions 

Comments 

COPY (depends on the copied code) 

DXD 

EJECT 

ENTRY 

EXTRN 

ICTL 

ISEQ 

OPSYN 

PRINT 

PUNCH 

REPRO 

SPACE 

TITLE 

WXTRN 

No other assembler or machine instructions can precede a START 
instruction, since START, if used, must initiate the first control section 
in the program. 

An involuntary unnamed control section at the beginning can cause 
trouble if literals are used. Then the programmer must be aware of the 
fact, that unless he codes an LTORG statement in each control section where 
he uses literals, literals will be assembled in the first control section, 
which will in this case be the involuntary section. If that control 
section does not establish addressability (through USING), an 
addressability error will be the result. Therefore statements like EQU 
should not be placed before the first CSECT or the START instruction. 

Resumption of an unnamed control section at later points can be 
accomplished through unnamed CSECT statements. A program can contain only 
one unnamed control section. Of course, it is possible to write a program 
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that does not contain CSECT or START statements, 
as one unnamed control section. 

DSECT — Identify Dummy Section 



It will then be assembled 



A dummy section represents a control section that Is assembled but is 
not part of the object program. A dummy section is a convenient means of 
describing the layout of an area of storage without actually reserving the 
storage. (It is assumed that the storage is reserved either by some other 
part of this assembly or else by another assembly.) The DSECT instruction 
identifies the beginning or resumption of a dummy section. More than one 
dummy section may be defined per assembly, but each must be named. The 
format of the DSECT instruction statement is as follows: 



Name 


Operation 


Operand 


A vari- 
able symbol 
or ordinary 
symbol 


DSECT 


Not used; should 
be blank 



The symbol in the name field is a valid relocatable symbol whose value 
represents the first byte of the section. It has a length attribute of 1. 

Program statements belonging to dummy sections may be interspersed 
throughout the program or may be written as a unit. In either case, the 
appropriate DSECT instruction should precede each set of statements. When 
multiple DSECT instructions with the same name are encountered, the first 
is considered to initiate the dummy section and the rest to continue it. 
All assembler language instructions may occur within dummy sections. 

Symbols that name statements in a dummy section may be used in USING 
instructions. Therefore, they may be used in program elements (e.g. 
machine-instructions and data definitions) that specify storage addresses 
An example illustrating the use of a dummy section appears subsequently 
under "Addressing Dummy Sections." 

Note£ Symbols that name statements in a dummy section may be used in A- 
type address constants only when they are paired with another symbol from 
the same dummy section in an absolute expression. (See "Absolute and 
Relocatable Expressions", Section 2.) For example, if X and B name 
statements in the same dummy section, C DC A(B-X) would be valid, but C DC 
A(X) would be Invalid— yielding a relocatablllty error. 

DUMMY SECTION LOCATION ASSIGNMENT: A location counter is used to determine 
the relative locations of named program elements in a dummy section The 
location counter is always set to zero at the beginning of the dummy 
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section, and the location values assigned to symbols that name statements 
in the dummy section are relative to the initial statement in the section. 

ADDRESSING DUMMY SECTIONS: The programmer may wish to describe the format 
of an area whose storage location will not be determined until the program 
is executed. He can describe the format of the area in a dummy section, 
and he can use symbols defined in the dummy section as the operands of 
machine instructions. To effect references to the storage area, he does 
the following: 

1. Provides a USING statement specifying both a general register 
that the assembler can assign to the machine- instructions as a 
base register and a value from the dummy section that the 
assembler may assume the register contains. 

2. Ensures that the same register is loaded with the actual address 
of the storage area. 

The values assigned to symbols defined in a dummy section are relative 
to the initial statement of the section. Thus, all machine-instructions 
which refer to names defined in the dummy section will, at execution time, 
refer to storage locations relative to the address loaded into the 
register. 

An example is shown in the following coding. Assume that two 
independent assemblies (assembly 1 and assembly 2) have been loaded and are 
to be executed as a single overall program. Assembly 1 is an input routine 
that places a record in a specified area of storage, places the address of 
the input area containing the record in general register 3, and branches to 
assembly 2. Assembly 2 processes the record. The coding shown in the 
example is from assembly 2. 

The input area is described in assembly 2 by the DSECT control section 
named INAREA. Portions of the input area (i.e., record) that the 
programmer wishes to work with are named in the DSECT control section as 
shown. The assembler instruction USING INAREA, 3 designates general 
register 3 as the base register to be used in addressing the DSECT control 
section, and that general register 3 is assumed to contain the address of 
INAREA. 

Assembly 1, during execution, loads the actual beginning address of 
the input area in general register 3. Because the symbols used in the 
DSECT section are defined relative to the initial statement in the section, 
the address values they represent, will, at the time of program execution, 
be the actual storage locations of the input area. 
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Name 


Operation 


Operand 


ASMBLY2 
BEGIN 


CSECT 

BALR 

USING 

• 


2,0 
*,2 




• 

USING 

CLI 

BE 


INAREA, 3 
INCODE, C A' 
ATYPE 


ATYPE 


MVC 
MVC 


WORKA, INPUTA 
WORKS, INPUTS 


WORKA 
WORKS 


DS 
DS 


CL20 
CL18 


INAREA 
INCODE 
INPUTA 
INPUTS 


DSECT 
DS 
DS 
DS 


CLI 

CL20 

CL18 




• 

END 





The programmer must ensure that a section of code in his program is 
actually described by the dummy section which references it. Consider the 
following example, which illustrates how a diimmy section should not be 
addressed: 
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Name 


Operation 


TEST 


CSECT 

t 




CNOP 


HALF 


DS 


FULL 


DS 



END 



Operand 



2,4 
CL2 

F 



AREA 
HALF 
FULL 



DSECT 

DS 

DS 



CL2 
F 



Note that in the dummy section AREA, two bytes are skipped between 
HALF and FULL in order to align FULL on a fullword boundary. In the 
control section TEST, however, the CNOP instruction causes two bytes to be 
skipped. Thus FULL is properly aligned without skipping any bytes between 
HALF and FULL. 

When the programmer addresses the dummy section, the location of FULL 
(relative to the location of HALF) will not be the same as the location of 
FULL in the control section. 



Note: 



To correct this example change the CNOP instruction to CNOP 0,4. 



EXTERNAL DUMMY SECTIONS (ASSEMBLER F ONLY) 

External dummy sections facilitate communication between programs by 
allowing the programmer to define work areas in several different programs 
and then at execution to combine them into one block of storage accessible 
to each program. Several different programs may be assembled together, 
each with one or more external dummy sections and after the linkage editor 
processes these programs, the programmer can allocate storage for the dummy 
sections in one block. External dummy sections are defined through the use 
of the DXD instruction or a DSECT in combination with a Q-type DC 
instruction. In order to allocate the correct amount of storage when the 
program is executed, the programmer must use the CXD instruction, described 
below, within one of the programs. 

DXD ~ DEFINE EXTERNAL DUMMY SECTION 

The DXD Instruction (also referred to as a Pseudo Register) defines an 
external dummy section; when the assembler encounters a DXD instruction, it 
computes the amount of storage required and the alignment and passes this 
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information to the linkage editor which will compute the total length of 
the external dummy sections. The format for the DXD instruction is: 



Name 


Operation 


Operand 


A symbol 


DXD 


Duplication factor, 
type, length, 
constant 



The symbol in the name field is a symbol that usually appears as a Q-type 
constant in the operand field of a DC statement later in the program. It 
has a length attribute of 1. The operand form and alignment are the same 
as that described for the DS instruction. If more than one external dummy 
section with the same name is encountered by the linkage editor, it uses 
the largest section in computing total length; if two or more identically 
named external dummy sections have different boundary aligxunents, the 
linkage editor uses the most restrictive alignment in computing total 
length. An external dummy section is generated by a Q-type address 
constant which references a DSECT name. 

CXD - CUMULATIVE LENGTH EXTERNAL DUMMY SECTION 

The CXD instruction allocates a four-byte full-word aligned area in 
storage which will contain the sum of the lengths of all external dummy 
sections when the program is executed. This sum is supplied by the linkage 
editor. The instruction format is: 



Name 


Operation 


Operand 


Any S3anbol 
or blank 


CXD 


Must be blank 



The CXD instruction may appear anywhere within a program, or if several 
progr^as are being combined, it may appear in each program. The symbol in 
the name field has a length attribute of 4. 

The following example shows how external dummy sections may be used. 
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ROUTINE A 




Name 


Operation 


Operand 


ALPHA 

BETA 

OMEGA 


DXD 
DXD 
CXD 

• 

DC 
DC 

• 
• 


2DL8 
4FL4 

Q (ALPHA) 
Q(BETA) 



ROUTINE B 



Name 


Operation 


Operand 


GAMMA 
DELTA 


DXD 
DXD 

• 

DC 
DC 

• 


5D 
lOF 

Q (GAMMA) 
Q (DELTA) 



ROUTINE C 



Name 


Operation 


Operand 


EPSILON 


DXD 

• 

DC 

• 


4H 

Q (EPSILON) 



Each of the three routines is requesting an amount of work area. Routine 
A wants 2 double words and 4 full words. Routine B wants 5 double words 
and 10 full words. Routine C wants 4 half words. At the time these 
routines are brought into storage the sum of the individual lengths will be 
placed in the location of the CXD instruction labeled OMEGA. Routine A can 
then allocate the amount of storage that is specified in the CXD location. 
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COM ~ DEFINE BLANK COMMON CONTROL SECTION 

The COM assembler instruction identifies and reserves a common area of 
storage that may be referred to by independent assemblies that have been 
linked and loaded for execution as one overall program. 

Appearances of a COM statement after the initial one indicate the 
resumption of the blank common control section. 

When several assemblies are loaded, each designating a common control 
section, the amount of storage reserved is equal to the longest common 
control section. The format is: 



Name 


Operation 


Operand 


A se- 
quence 
symbol or 
blank 


COM 


Blank 



The common area may be broken up into subfields through use of the DS 
and DC assembler instructions. Names of subfields are defined relative to 
the beginning of the common section, as in the DSECT control section. 

It is necessary to establish addressability relative to a named 
statement within COM since the COM statement itself cannot have a name. In 
the following example, addressability to the common area of storage is 
established relative to the named statement XYZ. 



Name 


Operation 


Operand 




. 

L 

USING 

MVC 

. 


1,=A(XYZ) 

XYZ,1 

PDQ(16),=4C'ABCD' 


XYZ 
PDQ 


• 

COM 

DS 

DS 

• 


16F 
16C 



No instructions or constants appearing in a common control section are 
assembled. Data can only be placed in a common control section through 
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execution of the program. A blank common control section may include any 
assembler language instructions. 

If the assignment of common storage is done in the same manner by each 
independent assembly, reference to a location in common by any assembly 
results in the same location being referenced. When the blank common 
control section is assembled, the initial value of the location counter is 
set to zero. 

SYMBOLIC LINKAGES 

Symbols may be defined in one module and referred to in another, thus 
effecting symbolic linkages between independently assembled program 
sections. The linkages can be effected only if the assembler is able to 
provide information about the linkage symbols to the linkage editor, which 
resolves these linkage references at load time. The assembler places the 
necessary information in the external symbol dictionary on the basis of the 
linkage symbols identified by e.g., the ENTRY and EXTRN instructions. Note 
that these symbolic linkages are described as linkages between independent 
modules; more specifically, they are linkages between independently 
assembled control sections. 

In the module where the linkage symbol is defined (i.e., used as a 
name), it must also be identified to the assembler by means of the ENTRY 
assembler instruction unless the symbol is the name of a CSECT or START 
statement. It is identified as a symbol that names an entry point, which 
means that another module may use that symbol in order to effect a branch 
operation or a data reference. The assembler places this information in 
the control dictionary. 

Similarly, the module that uses a symbol defined in some other module 
must identify it by the EXTRN or WXTRN assembler instruction. It is 
identified as an externally defined symbol (i.e., defined in another 
module) that is used to effect linkage to the point of definition. The 
assembler places this information in the external symbol dictionary. 

Another way to obtain symbolic linkages, is by using the V-type 
address constant. The subsection "Data Definition Instructions" in Section 
5 contains the details pertinent to writing a V-type address constant. It 
is sufficient here to note that this constant may be considered an indirect 
linkage point. It is created from an externally defined symbol, but that 
symbol does not have to be identified by an EXTRN or WXTRN statement. The 
V-type address constant may be used for external branch references (i.e., 
for effecting branches to other programs) . It may not be used for external 
data references (i.e., for referring to data in other programs). 

ENTRY ~ IDENTIFY ENTRY-POINT SYMBOL 

The ENTRY instruction identifies linkage symbols that are defined in 
one source module and referenced by other modules. 
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A se- 


ENTRY 


One or more reloca- 


quence 




table symbols. 


symbol 




separated by 


or 




commas, that also 


blank 




appear as state- 
ment names 



A source module may contain a maximum of 100 ENTRY symbols. ENTRY 
symbols which are not defined (not appearing as statement names), although 
invalid, will also count towards this maximum of 100 ENTRY symbols. 

The symbols in the ENTRY operand field may be used as operands by 
other programs. An ENTRY statement operand may not contain a symbol 
defined in a dummy section or in a blank common control section. The 
following example identifies the statements named SINE and COSINE as entry 
points to the program. 



Name 


Operation 


Operand 




ENTRY 


SINE, COSINE 



Note: Labels of START and CSECT statements are automatically treated as 
entry points to a module. Thus they need not be identified by ENTRY 
statements. 

EXTRN ~ IDENTIFY EXTERNAL SYMBOL 

The EXTRN instruction identifies linkage symbols used by one source 
module but identified in another module. Each external symbol must be 
identified. This includes symbols that refer to control section names. 
The format of the EXTRN statement is: 



Name 


Operation 


Operand 


A se- 
quence 
symbol 
or 
blank 


EXTRN 


One or more reloca- 
table symbols, 
separated by commas 
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The symbols in the operand field may not appear as the name of 
statements in the module where the EXTRN statement is . The length 
attribute of an external symbol is 1. 

The following example identifies three external symbols. They are 
used as operands in the module where they appear, but they are defined in 
some other module. 



Name 


Operation 


Operand 




EXTRN 
EXTRN 


RATEBL.PAYCALC 
WITHCALC 



An example that employs the EXTRN instruction appears subsequently 
under "Addressing External Control Sections." 

Note 1: A V-type address constant does not have to be identified by an 
EXTRN statement. 

Note 2: When external symbols are used in an expression they may not be 
paired. Each external symbol must be considered as having a unique 
relocatability attribute. 

Addressing External Control Sections 

A common way for a program to link to an external control section is 
to: 

1. Create a V-type address constant with the name of the external 

symbol. 

2. Load the constant into a general register and branch to the 
control section via the register. 

For example, to link to the control section named SINE, the following 
coding might be used: 
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Name 


Operation 


Operand 


MAINPROG 
BEGIN 

VCON 


CSECT 

BALR 

USING 

• 
• 

L 
BALR 

• 
• 

DC 
END 


2.0 
*.2 

3, VCON 
1,3 

V(SINE) 
BEGIN 



An external symbol naming data may be referred to as follows: 

1. Identify the external symbol with the EXTRN instruction, and 
create an address constant from the symbol. 

2. Load the constant into a general register, and use the register 
for base addressing. 

For example, to add to register 3 the contents of a data area named 
RATETBL, which is in another control section, the following coding might be 
used: 



Name 


Operation 


Operand 


MAINPROG 
BEGIN 


CSECT 

BALR 

USING 

• 


2.0 
*,2 




• 

EXTRN 

• 


RATETBL 




• 

L 

USING 

A 

• 


4. RATEADDR 
RATETBL, 4 
3, RATETBL 


RATEADDR 


• 

DC 
END 


A(RATETBL) 
BEGIN 
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The total number of control sections, dummy sections, external symbols 
and external dummy sections must not exceed 255. Certain constants may 
cause a symbol to be counted twice: external symbols in V-type address 
constants (unless they are explicitly defined in an EXTRN or WXTRN 
statement), and external dummy sections implicitly defined by Q-type 
address constants and corresponding DSECT statements. (EXTRN and WXTRN 
statements are discussed in this section; V-type constants in Section 5 
under the DC assembler instruction.) 

WXTRN ~ IDENTIFY WEAK EXTERNAL SYMBOL 

The WXTRN statement has the same format as the EXTRN statement. It is 
used to identify weak external references. The only difference between a 
weak (WXTRN) and a strong (EXTRN or V-type constant) external reference is 
that the automatic library call mechanism of the linkage editor or loader 
is not effective for symbols that are identified in WXTRN statements. 

The automatic library call mechanism searches the call library for any 
unresolved external references. If it finds any of these references, it 
includes the module where the reference occurs in the load module produced 
by the linkage editor or loader. Refer to OS Loader and Linkage Editor for 
a full description of the automatic library call mechanism. 

The format of the WXTRN instruction is: 



Name 


Operation 


Operand 


A se- 
quence 
symbol 
or blank 


WXTRN 


One or more reloca- 
table symbols, 
separated by 
commas 



Note: If 
instruction. 



a V-type address constant is identified by a WXTRN 
the automatic library call mechanism is suppressed for it. 
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SECTION 4; MACHINE-INSTRUCTIONS 



This section discusses the coding of the machine-instructions repre- 
sented in the assembler language . The reader is reminded that the 
functions of each machine-instruction are discussed in the principles of 
operation manual (see Preface) • 

MACHINE-INSTRUCTION STATEMENTS 

Machine-instructions may be represented symbolically as assembler lan- 
guage statements. The symbolic format of each varies according to the 
actual machine-instruction format, of which there are five: RR, RX, RS» 
SI» and SS. Within each basic format, further variations are possible. 

The symbolic format of a machine-instruction is similar to, but does 
not duplicate, its actual format. Appendix C illustrates machine format 
for the five classes of instructions. A mnemonic operation code is written 
in the operation field, and one or more operands are written in the operand 
field. Comments may be appended to a machine- instruction statement as 
previously explained in Section 1. 

Any machine-instruction statement may be named by a symbol, which 
other assembler statements can use as an operand. The value attribute of 
the symbol is the address of the leftmost byte assigned to the assembled 
instruction. The length attribute of the symbol depends on the basic 
instruction format, as follows: 



Basic 


Format 


Length 


Attribute 


RR 




2 






RX 




4 






RS 




4 






S 




4 






SI 




4 






SS 




6 






RI 




4 






R 




2 






Instruction 


Alignment 


and 


Checking 



All machine-instructions are aligned automatically by the assembler on 
half-word boundaries. If any statement that causes information to be 
assembled requires alignment, the bytes skipped are filled with hexadecimal 
zeros. All expressions that specify storage addresses are checked to 
ensure that they refer to appropriate boundaries for the instructions in 
which they are used. Register numbers are also checked to make sure that 
they specify the proper registers, as follows: 

1. Floating-point instructions must specify floating-point registers 
0, 2, 4, or 6. 
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2. Double-shift, full-word multiply, and divide instructions must 
specify an even-numbered general register in the first operand. 

OPERAND FIELDS AND SUBFIELDS 

Some symbolic operands are written as a single field, and other 
operands are written as a field followed by one or two subfields. For 
example, addresses consist of the contents of a base register and a 
displacement. An operand that specifies a base and displacement is written 
as a displacement field followed by a base register subfield, as follows: 
40(5). In the RX format, both an index register subfield and a base 
register subfield are written as follows: 40(3,5). In the SS format, both 
a length subfield and a base register subfield are written as follows: 
40(21,5). 

Appendix C shows two types of addressing formats for RX, RS, SI, and 
SS instructions. In each case, the first type shows the method of specify- 
ing an address explicitly, as a base register and displacement. The second 
type indicates how to specify an implied address as an expression. 

For example, a load multiple instruction (RS format) may have either 
of the following symbolic operands: 

R1,R3,D2(B2) - - explicit address 
R1,R3,S2 - - implied address 

Whereas D2 and B2 must be represented by absolute expressions, S2 may 
be represented either by a relocatable or an absolute expr^sion. 

In order to use implied addresses, the following rules must be 
observed: 

1. The base register assembler instructions (USING and DROP) must be 
used. 

2. An explicit base register designation must not accompany the 
implied address. 

For example, assume that FIELD is a relocatable symbol, which has been 
assigned a value of 7400. Assume also that the assembler has been notified 
(by a USING instruction) that general register 12 currently contains a 
relocatable value of 4096 and is available as a base register. The 
following example shows a machine-instruction statement as it would be 
written in assembler language and as it would be assembled. Note that the 
value of D2 is the difference between 7400 and 4096 and that X2 is 
assembled as zero, since it was omitted. The assembled instruction is 
presented in hexadecimal: 
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Assembler statement: 

ST 4, FIELD 

Assembled instruction: 

Op. Code Rl X2 
50 4 



B2 
C 



D2 
CE8 



An address may be specified explicitly as a base register and 
displacement (and index register for RX instructions) by the formats shown 
in the first column of Table 4-1. The address may be specified as an 
implied address by the formats shown in the second column. Observe that 
the two storage addresses required by the SS instructions are presented 
separately; an implied address may be used for one, while an explicit 
address is used for the other. 

Table 4-1. Address Specification Details 



Type 


Explicit Address 


Implied Address 


RX 


D2(X2,B2) 


82 (X2) 




D2(,B2) 


S2 


RS 


D2(B2) 


S2 


SI 


Dl(Bl) 


SI 


SS 


D1(L1,B1) 


Sl(Ll) 




D1(L,B1) 


S1(L) 




D2(L2,B2) 


S2(L2) 



A comma must separate operands. Parentheses must enclose a subfield 
or subfields, and a comma must separate two subfields within parentheses. 
When parentheses are used to enclose one subfield, and the subfield is 
omitted, the parentheses must be omitted. In the case of two subfields 
that are separated by a comma and enclosed by parentheses, the following 
rules apply: 



1. 



If both subfields are omitted, the 
parentheses must also be omitted. 



separating comma and the 



L 
L 



2,48(4,5) 

2, FIELD 



(implied address) 



2. 



If the first subfield in the sequence is omitted, the comma that 
separates it from the second subfield is written. The paren- 
theses must also be written. 

MVC 32(16,5),FIELD2 

MVC 32(,5),FIELD2 (implied length) 
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3. If the second subfield in the sequence is omitted, the comma that 
separates it from the first subfield must be omitted. The paren- 
theses must be written. 

MVC 32(16,5),FIELD2 

MVC FIELD1(16) ,FIELD2 (implied address) 

Fields and subfields in a symbolic operand may be represented either 
by absolute or by relocatable expressions, depending on what the field 
requires. (An expression has been defined as consisting of one term or a 
series of arithmetically combined terms.) Refer to Appendix C for a 
detailed description of field requirements. 

Note ; Blanks may not appear in an operand unless provided by a character 
self-defining term or a character literal. Thus, blanks may not intervene 
between fields and the comma separators, between parentheses and fields, 
etc. 

LENGTHS ~ EXPLICIT AND IMPLIED 

The length field in SS instructions can be explicit or implied. To 
imply a length, the programmer omits a length field from the operand. The 
omission indicates that the length field is either of the following: 

1. The length attribute of the expression specifying the displace- 
ment, if an explicit base and displacement have been written. 

2. The length attribute of the expression specifying the effective 
address, if the base and displacement have been implied. 

In either case, the length attribute for an expression is the length 
of the leftmost term in the expression. The value of L'* is the length of 
the instruction in all non-literal machine instruction operands and in the 
CCW assembler instruction. In all other uses its value will be 1. 

By contrast, an explicit length is written by the programmer in the 
operand as an absolute expression. The explicit length overrides any 
implied length. 

Whether the length is explicit or implied, it is always an effective 

length. The value inserted into the length field of the assembled 

instruction is one less than the effective length in the machine- 
instruction statement. 

Note: If a length field of zero is desired, the length may be stated as 
zero or one. 

To summarize , the length required in an SS instruction may be 
specified explicitly by the formats shown in the first column of Table 4-2 
or may be implied bv the formats shown in the second column. Observe that 
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the two lengths required In one of the SS Instruction formats are presented 
separately. An Implied length may be used for one, while an explicit 
length is used for the other. 

Table 4-2. Details of Length Specification in SS Instructions 



Explicit Length 


Implied Length 


D1(L1,B1) 


DK.Bl) 


SI (LI) 


SI 


D1(L,B1) 


DK.Bl) 


S1(L) 


SI 


D2(L2,B2) 


D2(,B2) 


S2(L2) 


S2 



MACHINE-INSTRUCTION MNEMONIC CODES 

The mnemonic operation codes (shown in Appendix D) are designed to be 
easily remembered codes that indicate the functions of the instructions. 
The normal format of the code is shown below; the items in brackets are not 
necessarily present in all codes: 

Verb [Modifier] [Data Type] [Machine Format] 

The verb, which is usually one or two characters, specifies the 
function. For example, A represents Add, and MV represents Move. The 
function may be further defined by a modifier. For exaiiq)le, the modifier 
L indicates a logical function, as in AL for Add Logical. 

Mnemonic codes for functions involving data usually indicate the data 
types by letters that correspond to those for the data types in the DC 
assembler instruction (see Section 5). Furthermore, letters U and W have 
been added to indicate short and long, unnormalized floating-point 
operations, respectively. For example, AE indicates Add Normalized Short, 
whereas AU indicates Add Unnormalized Short. Where applicable, full-word 
fixed-point data is implied if the data type is omitted. 

The letters R and I are added to the codes to indicate, respectively, 

RR and SI machine instruction formats. Thus, AER indicates Add Normalized 

Short in the RR format. Functions involving character and decimal data 
types imply the SS format. 

MACHINE-INSTRUCTION EXAMPLES 

The examples that follow are grouped according to machine-instruction 
format. They illustrate the various symbolic operand formats. All symbols 
employed in the examples must be assumed to be defined elsewhere in the 
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same assembly. All symbols that specify register niimbers and lengths must 
be assumed to be equated elsewhere to absolute values. 

Implied addressing, control section addressing, and the function of 
the USING assembler instruction are not considered here. For discussion of 
these considerations and for examples of coding sequences that illustrate 
them, the reader is referred to Section 3, "Program Sectioning and Linking" 
and "Base Register Instructions." 

RR Format 



Name 


Operation 


Operand 


ALPHAl 


LR 


1.2 


ALPHA2 


LR 


REG1,REG2 


BETA 


SPM 


15 


GAMMAl 


SVC 


250 


GAMMA2 


SVC 


TEN 



The operands of ALPHAl, BETA, and GAMMAl are decimal self-defining 
values, which are categorized as absolute expressions. The operands of 
ALPHA2 and GAMHA2 are symbols that are equated elsewhere to absolute 
values . 

RX Format 



Name 


Operation 


Operand 


ALPHAl 


L 


1,39(4,10) 


ALPHA2 


L 


REG1,39(4,TEN) 


BETAl 


L 


2,ZETA(4) 


BETA2 


L 


REG2,ZETA(REG4) 


GAMMAl 


L 


2,ZETA 


GAMMA2 


L 


REG2,ZETA 


GAMMA3 


L 


2,-F'lOOO' 


LAMBDAl 


L 


3,20(,5) 



Both ALPHA instructions specify explicit addresses; REGl and TEN are 
absolute symbols. Both BETA instructions specify implied addresses, and 
both use index registers. Indexing is omitted from the GAMMA instructions. 
GAMMAl and GAMMA2 specify implied addresses. The second operand of GAMMA3 
is a literal. LAMBDAl specifies no indexing. 
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RS Format 



Name 


Operation 


Operand 


ALPHAl 
ALPHA2 
ALPHA3 
ALPHA4 
ALPHAS 


BXH 
BXH 
BXH 

SLL 
SLL 


1,2,20(14) 

REG1,REG2,20(R£GD) 

REG1,R£G2,ZETA 

R£G2,15 

REG2,0(15) 



Whereas ALPHAl and ALPHA2 specify explicit addresses, ALPHAS specifies 
an Implied address. ALPHA4 Is a shift Instruction shifting the contents of 
REG2 left 15 bit positions. ALPHAS Is a shift Instruction shifting the 
contents of R£G2 left by the value contained In general register 15. 

RI Format 



Name 


Operation 


Operand 


ALPHAl 
ALPHA2 
BETA 


AHI 
AHI 
AHI 


REG1,X'1234' 
2, CAB' 
REG2,TEN 



The operands of ALPHAl and ALPHA2 are self-defining values which are 
categorized as absolute expressions. The operand of BETA Is a symbol which 
Is equated elsewhere to an absolute value* 

SI Format 



Name 


Operation 


Operand 


ALPHAl 
ALPHA2 
BETAl 
BETA2 


CLI 
CLI 
CLI 
CLI 


40(9),X'40' 
40(REG9),TEN 
ZETA,TEN 
ZETA,C'A* 



The ALPHA Instructions specify explicit addresses, whereas the BETA 
instructions specify Implied addresses. 
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S Format 



Name 


Operation 


Operand 


GAMMAl 
GAMMA2 
GAMMA3 
GAMMA4 


SID 
SIC 
SIO 
SIO 


40(9) 
0(9) 
40(0) 
ZETA 



The GAMMAl, GAMMA2, and GAMMA3 Instructions specify explicit 
addresses. The GAMMA4 instruction specifies an Implied address. The GAMMA2 
instruction specifies a displacement of zero. The GAMMA3 instruction does 
not specify a base register. 

SS Format 



Name 


Operation 


Operand 


ALPHAl 


AP 


40(9, 8), 30(6. 7) 


ALPHA2 


AP 


40 (NINE, REGS) ,30 (L6, 7) 


ALPHA3 


AP 


FIELD2,FIELD1 


ALPHA4 


AP 


FIELD2(9),FIELD1(6) 


BETA 


AP 


FIELD2(9),FIELD1 


GAMMAl 


MVC 


40(9, 8), 30(7) 


GAMMA2 


MVC 


40 (NINE, REGS) .DEC (7) 


GAMMAS 


MVC 


FIELD2,FIELD1 


GAMMA4 


MVC 


FIELD2(9),FIELD1 



ALPHAl ^ ALPHA2 , GAMMAl , and GAMMA2 specify explicit lengths and 
addresses. ALPHA3 and GAMMA3 specify both implied length and implied 
addresses. ALPHA4 and GAMMA4 specify explicit length and implied 
addresses. BETA specifies an explicit length for FIELD2 and an implied 
length for FIELDl; both addresses are implied. 

EXTENDED MNEMONIC CODES 

For the convenience of the programmer, the assembler provides extended 
mnemonic codes, which allow conditional branches to be specified 
mnemonically as well as through the use of the BC machine- instruction. 
These extended mnemonic codes specify both the machine branch instruction 
and the condition on which the branch is to occur. The codes are not part 
of the universal set of machine-instructions, but are translated by the 
assembler into the corresponding operation and condition combinations. 

The allowable extended mnemonic codes and their operand formats are 
shown in Figure 4-1, together with their machine-instruction equivalents. 
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Unless otherwise noted, all extended mnemonics shown are for Instructions 
In the RX format. Note that the only difference between the operand fields 
of the extended mnemonics and those of their machine-Instruction 
equivalents Is the absence of the Rl field and the comma that separates It 
from the rest of the operand field. The extended mnemonic list, like the 
machine-Instruction list, shows explicit address formats only. Each 
address can also be specified as an Implied address. 



Extended Code 


Meaning 


Machine-Instruction 


B 


D2(X2,B2) 


Branch Unconditional 


BC 15,D2(X2,B2) 


BR 


R2 


Branch Unconditional (SR format) 


BCR 15, R2 


NOP 


D2(X2,B2) 


No Operation 


BC 0,D2(X2,B2) 


NOPR R2 


No Operation (RR format) 


BCR 0,R2 




Used After 


Compare Instructions 




BH 


D2(X2,B2) 


Branch on High 


BC 2,D2(X2,B2) 


BL 


D2(X2,B2) 


Branch on Low 


BC 4,D2(X2,B2) 


BE 


D2(X2,B2) 


Branch on Equal 


BC 8,D2(X2,B2) 


BNH 


D2(X2,B2) 


Branch on Not High 


BC 13,D2(X2,B2) 


BNL 


D2(X2,B2) 


Branch on Not Low 


BC 11,D2(X2,B2) 


BNE 


D2(X2,B2) 


Branch on Not Equal 


BC 7,D2(X2,B2) 




Used After Arithmetic Instructions 




BO 


D2(X2,B2) 


Branch on Overflow 


BC 1,D2(X2,B2) 


BP 


D2(X2,B2) 


Branch on Plus 


BC 2,D2(X2,B2) 


BM 


D2(X2,B2) 


Branch on Minus 


BC 4,D2(X2,B2) 


BZ 


D2(X2,B2) 


Branch on Zero 


BC 8,D2(X2,B2) 


BNP 


D2(X2,B2) 


Branch on Not Plus 


BC 13,D2(X2,B2) 


BNM 


D2(X2,B2) 


Branch on Not Minus 


BC 11,D2(X2,B2) 


BNZ 


D2(X2,B2) 


Branch on Not Zero 


BC 7,D2(X2,B2) 




Used After 


Test Under Mask Instructions 




BO 


D2(X2,B2) 


Branch If Ones 


BC 1,D2(X2,B2) 


BM 


D2(X2,B2) 


Branch If Mixed 


BC 4,D2(X2,B2) 


BZ 


D2(X2,B2) 


Branch If Zeros 


BC 8,D2(X2,B2) 


BNO 


D2(X2,B2) 


Branch If Not Ones 


BC 14,D2(X2,B2) 



Figure 4-1. Extended Mnemonic Codes 

In the following examples, which Illustrate the use of extended mne- 
monics, It Is to be assumed that the symbol GO Is defined elsewhere In the 
program. 
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Name 


Operation 


Operand 




B 


40(3,6) 




B 


A0(,6) 




BL 


GO (3) 




BL 


GO 




BR 


4 



The first two instructions specify an unconditional branch to an 
explicit address. The address in the first case is the sum of the contents 
of base register 6, the contents of index register 3, and the displacement 
40; the address in the second instruction is not indexed. The third 
instruction specifies a branch on low to the address implied by GO as 
indexed by the contents of index register 3; the fourth Instruction does 
not specify an index register. The last instruction is an unconditional 
branch to the address contained in register 4. 
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SECTION 5: ASSEMBLER INSTRUCTION STATEMENTS 



Just as machine instructions are used to request the computer to per- 
form a sequence of operations during program execution time, so assembler 
instructions are requests to the assembler to perform certain operations 
during the assembly. Assembler-ins true t ion statements , in contrast to 
machine-instruction statements, do not usually cause machine-instructions 
to be included in the assembled program. Some, such as DS and DC, generate 
no instructions but do cause storage areas to be set aside for constants 
and other data. Others, such as EQU and SPACE, are effective only at 
assembly time; they generate nothing in the assembled program and have no 
effect on the location counter.* 

The following is a list of assembler instructions. 

Symbol Definition Instruction 
EQU - Equate Symbol 

Operation Code Definition Instruction 

OPSYN - Equate Operation Code (Assembler F only) 



Data Definition Instructions 



DC 
DS 



Define Constant 
Define Storage 



Program Sectioning and Linking Instructions 

START - Start Assembly 

CSECT - Identify Control Section 

CXD - Cumulative Length of Exteimal Dummy Section 

(Assembler F only) 
DSECT - Identify Dummy Section 
DXD - Define External Dummy Section 

(Assembler F only) 
ENTRY - Identify Entry-Point Symbol 
EXTRN - Identify External Symbol 
WXTRN - Identify Weak External Symbol 

(Assembler F only) 
COM - Identify Blank Common Control Section 



Base Register Instructions 

USING - Use Base Address Register 

DROP - Drop Base Address Register 

Listing Control Instructions 
TITLE - Identify Assembly Output 
EJECT - Start New Page 
SPACE - Space Listing 
PRINT - Print Optional Data 
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Program Control Instructions 

ICTL - Input Format Control 

ISEQ - Input Sequence Checking 

PUNCH - Punch a Card 

REPRO - Reproduce Following Card 

ORG - Set Location Counter 

LTORG - Begin Literal Pool 

CNOP - Conditional No Operation 

COPY - Copy Predefined Source Coding 

END - End Assembly 

SYMBOL DEFINITION INSTRUCTION 

EQU ~ EQUATE SYMBOL 

The EQU instruction is used to define a symbol by assigning to it the 
length, value, and relocatability attributes of an expression in the 
operand field. The format of the EQU instruction statement is as follows: 



Name 



A variable 
symbol or 
ordinary 
symbol 



Operation 
EQU 



Operand 



An expression 



.1 



The expression in the operand field can be absolute or relocatable. 
Any symbols appearing in the expression must be previously defined. 

The symbol in the name field is given the same length, value, and 
relocatability attributes as the expression in the operand field. The 
length attribute of the symbol is that of the leftmost (or only) term of 
the expression. In the case of EQU to * or to a self-defining term, the 
length attribute is 1. The value attribute of the symbol is the value of 
the expression. 

The EQU instruction is used to equate symbols to register numbers, 
immediate data, or other arbitrary values. The following examples 
illustrate how this can be done: 



Name 


Operation 


1 

Operand 


REG2 
TEST 


EQU 
EQU 


2 (general register) 
X'3F' (immediate data) 
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To reduce programming time, the programmer can equate symbols to fre- 
quently used expressions and then use the symbols as operands in place of 
the expressions. Thus, in the statement: 



Name 


Operation 


Operand 


FIELD 


EQU 


ALPBA-VEIA^GHmA. 



FIELD is defined as ALPHA-BETA +GAMMA and may be used in place of it. Note, 
however, that ALPHA, BETA, and GAMMA must all be previously defined. If 
the final result of the expression is negative, it is treated as if it were 
positive, i.e., the low-order 24 bits of the 2's complement is used. 

The assembler assigns a length attribute of 1 in an EQU to * 
statement. * 

OPERATION CODE DEFINITION INSTRUCTION 

OPSYN ~ EQUATE OPERATION CODE (ASSEMBLER F ONLY) 

The OPSYN instruction is used to define a machine mnemonic or extended 
mnemonic operation code as equivalent to another operation code. It is 
also used to prevent the assembler from recognizing an operation code. The 
OPSYN instruction has two formats: 



Name 


Operation 


Operand 


Any 


OPSYN 


A machine instruc- 


ordinary 




tion mnemonic code. 


symbol. 




an extended mne- 


except an 




monic code, or an 


assembler 




operation code de- 


operation 




fined by a previous 


code 




OPSYN instruction 



In this format, the OPSYN instruction assigns all the properties of 

the operation code in the operand field to the symbol in the name field. 

The symbol in the name field can be a previously defined machine or 

extended mnemonic operation code. In this case, the latest definition 
takes precedence. 
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Name 


Operation 


Operand 


A machine or 
extended mne- 
monic opera- 
tion code 


OPSYN 


Blank 



In this format, the OPSYN instruction prevents the assembler from 
recognizing the operation code in the name field. 

Only ICTL and OPSYN instructions may precede an OPSYN instruction. 

Additional information on use of the OPSYN instruction is contained in 
"OS Assembler (F) Programmer's Guide." 

DATA DEFINITION INSTRUCTIONS 



There are two data definition instruction statements: 
(DC) and Define Storage (DS) . 



Define Constant 



These statements are used to enter data constants into storage, to 
define and reserve areas of storage, and to specify the contents of channel 
command words. The statements can be named by symbols so that other 
program statements can refer to the generated fields. The DC instruction 
is presented first and discussed in more detail than the DS instruction 
because the DS instruction is written in the same format as the DC 
instruction and can specify some or all of the information that the DC 
instruction provides. Only the function and treatment of the statements 
vary. 

DC ~ DEFINE CONSTANT 

The DC instruction is used to provide constant data in storage. It 
can specify one constant or a series of constants. A variety of constants 
can be specified : fixed-point , floating-point , decimal , hexadecimal , 
character, and storage addresses* (Data constants are generally called 
constants unless they are created from storage addresses, in which case 
they are called address constants.) The format of the DC instruction 
statement is as follows: 



Name 


Operation 


Operand 


Any symbol 
or blank 


DC 


One or more operands 
in the format des- 
cribed below, each 
separated by a comma 
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Each operand consists of four subflelds: the first three describe the 
constant, and the fourth subfield provides the nominal value (s) for the 
constant(s). The first and third subflelds can be omitted, but the second 
and fourth must be specified. Note that nominal value(s) for more than one 
constant can be specified In the fourth subfield for most types of 
constants. Each constant so specified must be of the same type; the 
descriptive subflelds that precede the nominal value apply to all of them. 
No blanks can occur within any of the subflelds (unless provided as 
characters In a character constant or a character self-defining term), nor 
can they occur between the subflelds of an operand. Similarly, blanks 
cannot occur between operands and the commas that separate them when 
multiple operands are being specified. 

The subflelds of each DC operand are written In the following 
sequence: 

1 2 3 4 

Duplication Type Modifiers Nominal Value (s) 
Factor 

Although the constants specified within one operand must have the same 
characteristics, each operand can specify a different type of constant. 
For example. In a DC Instruction with three operands, the first operand 
might specify four decimal constants, the second a floating-point constant, 
and the third a character constant. 

The symbol that names the DC Instruction Is the name of the constant 
(or first constant If the Instruction specifies more than one) . Relative 
addressing (e.g., SYMBOL+2) can be used to address the various constants If 
more than one has been specified, because the number of bytes allocated to 
each constant can be determined. 

The value attribute of the symbol naming the DC Instruction Is the 
address of the leftmost byte (after alignment) of the first, or only, 
constant. The length attribute depends on two things: the type of 
constant being defined and the presence of a length specification. Implied 
lengths are assumed for the various constant types In the absence of a 
length specification. If more than one constant Is defined, the length 
attribute Is the length In bytes (specified or Implied) of the first 
constant. 

Boundary alignment also varies according to the type of constant being 
specified and the presence of a length specification. Some constant types 
are only aligned to a byte boundary, but the DS Instruction can be used to 
force any type of word boundary alignment for them. This is explained 
under "DS — Define Storage." Other constants are aligned at various word 
boundaries (half, full, or double) in the absence of a length 
specification. If length is specified, no boundary alignment occurs for 
such constants. 
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Bytes that must be skipped in order to align the field at the proper 
boundary are not considered to be part of the constant. In other words, 
the location counter is incremented to reflect the proper boundary (if any 
incrementing is necessary) before the address value is established. Thus, 
the symbol naming the constant will not receive a value attribute that is 
the location of a skipped byte. 

Any bytes skipped in aligning statements that do not cause information 
to be assembled are not zeroed. Bytes skipped to align a DC statement are 
zeroed; bytes skipped to align a DS statement are not zeroed. 

Appendix F summarizes, in chart form, the information concerning 
constants that is presented in this section. 

LITERAL DEFINITIONS : The reader is reminded that the discussion of 
literals as machine- instruct ion operands (in Section 2) referred him to the 
description of the DC operand for the method of writing a literal operand. 
All subsequent operand specifications are applicable to writing literals, 
the only difference being: 

1. The literal is preceded by an equal sign. 

2. Multiple operands may not be specified. 

3. Unsigned decimal self -defining terms must be used to express the 
duplication factor and length modifier values. 

4. The duplication factor may not be zero. 

5. S-type address constants may not be specified. 

6. Signed or unsigned decimal self -defining terms must be used to 
express scale and exponent modifiers. 

7. Q-type address constants may not be specified in literals. 

Examples of literals appear throughout the balance of the DC 
instruction discussion. 

Operand Subfield 1: Duplication Factor 

The duplication factor may be omitted. If specified, it causes the 
constant (s) to be generated the number of times indicated by the factor. 
The factor may be specified either by an unsigned decimal self-defining 
term or by a positive absolute expression that is enclosed by parentheses. 
The duplication factor is applied after the constant is assembled. All 
symbols in the expression must be previously defined. 

Note that a duplication factor of zero is permitted except in a 
literal and achieves the same result as it would in a DS instruction. A DC 
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instruction with a zero duplication factor will not produce control 
dictionary entries. See "Forcing Alignment" under "DS ~ Define Storage." 

Note ; If duplication is specified for an address constant containing a 
location counter reference, the value of the location counter used in each 
duplication is incremented by the length of the operand. 

Operand Subfield 2: Type 

The type subfield defines the type of constant being specified. From 
the type specification, the assembler determines how it is to interpret the 
constant and translate it into the appropriate machine format. The type is 
specified by a single-letter code as shown in Figure 5-1. 



Code 


Type of Constant 
Character 


Machine Format 

8-bit code for each character 


~ j 
1 


C 




X 


Hexadecimal 


4-bit code for each hexadecimal digit 




B 


Binary 


Binary format 




F 


Fixed-point 


Signed, fixed-point binary format; normally a 


full word 


H 


Fixed-point 


Signed, fixed-point binary format; normally a 


half word 


I 


ASCII 


8-bit ASCII code for each character 




E 


Floating-point 


Short floating-point format; normally a full 


word 


D 


Floating-point 


Long floating-point format; normally a double word 


L 


Floating-point 


Extended floating-point format; normally two 
words (Assembler F only) 


double 


P 


Decimal 


Packed decimal format 




Z 


Decimal 


Zoned decimal format 




A 


Address 


Value of address; normally a full word 




Y 


Address 


Value of address; normally a half word 




S 


Address 


Base register and displacement value; a half 


word 


V 


Address 


Space reserved for external symbol addresses 
address normally a full word 


; each 


W 


Address 


Value of address; a full 16-bit halfword 




Q 


Address 


Space reserved for dummy section offset (Assembler F 






only) 





Figure 5-1. Type Codes for Constants 

Further information about these constants is provided in the 
discussion of the constants themselves under "Operand Subfield 4 : 
Constant." 

Operand Subfield 3; Modifiers 

Modifiers describe the length in bytes desired for a constant (in 
contrast to an implied length) , and the scaling and exponent for the 
constant. If multiple modifiers are written, they must appear in this 
sequence: length, scale, exponent. Each is written and used as described 
in the following text. 
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LENGTH MODIFIER ; This is written as Ln, where n is either an unsigned 
decimal self-defining term or a positive absolute expression enclosed by 
parentheses. Any symbols in the expression must be previously defined. 
The value of n represents the number of bytes of storage that are assembled 
for the constant. The maximum value permitted for the length modifiers 
supplied for the various types of constants is summarized in Appendix F. 
This table also indicates the implied length for each type of constant; the 
implied length is used unless a length modifier is present. A length 
modifier may be specified for any type of constant. However, no boundary 
alignment will be provided when a length modifier is given. 

Use of a length modifier may cause truncation. For example: 

DC C'ABCDXYZ' 

will generate a 7-byte constant, whereas 

DC CL6'ABCDXyZ' 

will generate a 6-byte constant and cause Z to be lost. Truncation of C, 
X, B, Z, A, Y, and P constants is not flagged as an error. However, F, H, 
E, D, and L constants will be flagged if significant bits are lost. 
Finally, each type of constant has an imposed or natural length modifier 
range limit. Appendix F shows which constants can be flagged for 
truncation of significant digits. It also shows the allowable length 
modifier range for each constant. 

Bit-Length Specification ; The length of a constant, in bits, is specified 
by L.n, where n is specified as stated above and represents the number of 
bits in storage into which the constant is to be assembled. The value of 
n may exceed eight and is interpreted to mean an integral number of bytes 
plus so many bits. For example, L.20 is interpreted as a length of two 
bytes plus four bits. 

Assembly of the first or only constant with bit-length specification 
starts on a byte boundary. The constant is placed in the high or low order 
end of the field depending on the type of constant being specified. The 
constant is padded or truncated to fit the field. If the assembled length 
does not leave the location counter set at a byte boundary, and another bit 
length constant does not immediately follow in the same statement, the 
remainder of the last byte used is filled with zeros. This leaves the 
location counter set at the next byte boundary. Figure 5-2 shows a fixed- 
point constant with a specified bit-length of 13, as coded, and as it would 
appear in storage. Note that the constant has been padded on the left to 
bring it to its designated 13-bit length. 
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As coded: 



Name 


Operation 


Operand 


BLCON 


DC 


FL.13'579' 



In storage: 
byte byte byte 
padding 

0001001000011000 

^^ ^ ^ / 

579 fill 

Figure 5-2. Bit-Length Specification (Single Constant) 

The implied length of BLCON is two bytes. A reference to BLCON would 
cause the entire two bytes to be referenced. 

When bit-length specification is used in association with multiple 
constants (see Operand Subfield 4: Constant following), each succeeding 
constant in the list is assembled starting at the next available bit. 
Figure 5-3 illustrates this. 

As coded: 



Name 


Operation 


Operand 


BLHCON 


DC 


FL.10'161,21,57' 



In storage: 
byte byte byte 



padding 



byte byte 



padding paddlag 



poioioootoiQOOooioioipoooiiiooi oQ 

161 21 57 fill 

Figure 5-3. Bit-Length Specification (Multiple Constants) 

The symbol used as a name entry in a DC assembler instruction takes on 
the length attribute of the first constant in the list; therefore, the 
implied length of BLMCON in Figure 5-3 is two bytes. 
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If duplication is specified, filling occurs once at 
field occupied by the duplicated constant (s). 



the end of the 



When bit-length specification is used in association with multiple 
operands, assembly of the constant (s) in each succeeding operand starts at 
the next available bit. Figure 5-4 illustrates this. 

As coded: 



Name 
BLMOCON 



Operation 

DC 



Operand 



FL.7'9',CL.10'AB\XL.14*C4' 



In storage: 
byte byte byte byte byte 



padding 



padding 



00010011100000111000000110001000 



C4 ^fill 



t. 



A plus 
first two 
bits of B 

Figure 5-4. Bit-Length Specification (Multiple Operands) 

In Figure 5-4, three different types of constants have been specified, 
one to an operand. Note that the character constant 'AB' which normally 
would occupy 16 bits is truncated on the right to fit the 10-bit field 
designated. Note that filling occurs only at the end of the field occupied 
by all the constants. 

Scale Modifier : This modifier is written as Sn, where n is either a 
decimal value or an absolute expression enclosed by parentheses. All 
symbols in the expression must be previously defined. The decimal self- 
defining term or the parenthesized expression may be preceded by a sign; if 
none is present, a plus sign is assumed. The maximum values for scale 
modifiers are summarized in Appendix F. 

A scale modifier may be used with fixed-point (F, H) and floating- 
point (E, D, L) constants only. It is used to specify the amount of 
internal scaling that is desired, as follows: 

Scale Modifier for Fixed-Point Constants : the scale modifier specifies the 
power of two by which the constant must be multiplied after it has been 
converted to its binary representation. Just as multiplication of a 
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decimal number by a power of 10 causes the decimal point to move, 
multiplication of a binary number by a power of two causes the binary point 
to move. This multiplication has the effect of moving the binary point 
away from its assumed position in the binary field; the assiimed position 
being to the right of the rightmost position. 

Thus, the scale modifier indicates either of the following: (1) the 
number of binary positions to be occupied by the fractional portion of the 
binary number, or (2) the number of binary positions to be deleted from the 
integral portion of the binary number. A positive scale of x shifts the 
integral portion of the number x binary positions to the left, thereby 
reserving the rightmost x binary positions for the fractional portion. A 
negative scale shifts the integral portion of the number right, thereby 
deleting rightmost integral positions. If a scale modifier does not 
accompany a fixed-point constant containing a fractional part, the 
fractional part is lost. 

In all cases where positions are lost because of scaling (or the lack 
of scaling), rounding occurs in the leftmost bit of the lost portion. The 
rounding is reflected in the rightmost position saved. 

Scale Modifier for Floating-Point Constants ; Only a positive scale 
modifier may be used with a floating-point constant. It indicates the 
number of hexadecimal positions that the fraction is to be shifted to the 
right. Note that this shift amount is in terms of hexadecimal positions, 
each of which is four binary positions. (A positive scaling actually 
indicates that the point is to be moved to the left. However, a floating- 
point constant is always converted to a fraction, which is hexadecimally 
normalized. The point is assumed to be at the left of the leftmost 
position in the field. Since the point cannot be moved left, the fraction 
is shifted right.) 

Thus, scaling that is specified for a floating-point constant provides 
an assembled fraction that is unnormalized , i.e., contains hexadecimal 
zeros in the leftmost positions of the fraction. When the fraction is 
shifted, the exponent is adjusted accordingly to retain the correct magni- 
tude. When hexadecimal positions are lost, rounding occurs in the leftmost 
hexadecimal position of the lost portion. The rounding is reflected in the 
rightmost hexadecimal position saved. 

EXPONENT MODIFIER : This modifier is written as En, where n is either a 
decimal self-defining term or an absolute expression enclosed by paren- 
theses. Any symbols in the expression must be previously defined. The 
decimal value or the parenthesized expression may be preceded by a sign; if 
none is present, a plus sign is assumed. 

An exponent modifier may be used with fixed-point (F, H) and floating- 
point (E, D, L) constants only. The modifier denotes the power of 10 by 
which the constant is to be multiplied before its conversion to the proper 
internal format. 
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This modifier is not to be confused with the exponent of the constant 
itself, which is specified as part of the constant and is explained under 
"Operand Subfield A: Constant." The exponent tnodifier affects each 
constant in the operand, whereas the exponent written as part of the 
constant only pertains to that constant. Thus, a constant may be specified 
with an exponent of +2, and an exponent modifier of +5 may precede the 
constant. In effect, the constant has an exponent of +7. 

The range for the exponent modifier is -85 through +75. However, if 
there is an exponent in the constant itself (see "Floating-Point Constants 
— E, D, and L" under "Operand Subfield 4: Constant") the sum of that 
exponent and the exponent modifier must be within the range -85 - +75. 
Thus, an exponent modifier of -40 together with an exponent of -47 would 
not be permitted. 

One further limitation is that the value specified must be contained 
in the implied length of the constant. Refer to "Floating Point 
Arithmetic" in IBM "System/360 Principles of Operation." 

Operand Subfield 4; Constant 

This subfield supplied the constant (or constants) described by the 
subfields that precede it. A data constant (any type except A, Y, S, Q, 
and V) is enclosed by apostrophes. An address constant (type A, Y, S, Q, 
or V) is enclosed by parentheses. To specify two or more constants in the 
subfield, the constants must be separated by commas and the entire sequence 
of constants must be enclosed by the appropriate delimiters (i.e., 
apostrophes or parentheses) . Thus , the format for specifying the 
constant (s) is one of the following: 

Single Multiple 

Constant Constants* 

'constant* 'constant, . . . , constant' 

(constant) (constant, . . . , constant) 

*Not permitted for character, hexadecimal, and binary constants. 

All constant types except character (C) , hexadecimal (X), binary (B) , 
packed decimal (P) , and zoned decimal (Z) , are aligned on the proper 
boundary, as shown in Appendix F, unless a length modifier is specified. 
In the presence of a length modifier, no boundary alignment is performed. 
If an operand specifies more than one constant, any necessary alignment 
applies to the first constant only. Thus, for an operand that provides 
five full-word constants, the first would be aligned on a full-word 
boundary, and the rest would automatically fall on full-word boundaries. 

The total storage requirement of an operand is the product of the 
length times the number of constants in the operand times the duplication 
factor (if present) plus any bytes skipped for boundary alignment of the 
first constant. If more than one operand is present, the storage 
requirement is derived by summing the requirements for each operand. 
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I£ an address constant contains a location counter reference, the 
location counter value that Is used Is the storage address o£ the first 
byte the constant will occupy « Thus, If several address constants In the 
same instruction refer to the location counter, the value of the location 
counter varies from constant to constant. Similarly, if a single constant 
is specified (and it is a location counter reference) with a duplication 
factor, the constant is duplicated with a varying location counter value. 

The following text describes each of the constant types and provides 
examples . 

Character Constant — C ; Any of the valid 256 punch combinations can be 
designated in a character constant. Only one character constant can be 
specified per operand. Since multiple constants within an operand are 
separated by commas, an attempt to specify two character constants results 
in interpreting the comma separating them as a character. 

Special consideration must be given to representing apostrophes and 
ampersands as characters. Each single apostrophe or ampersand desired as 
a character in the constant must be represented by a pair of apostrophes or 
ampersands. Only one apostrophe or ampersand appears in storage. 

The maximum length of a character constant is 256 bytes. No boundary 
alignment is performed. Each character is translated into one byte. 
Double apostrophes or double ampersands count as one character. If no 
length modifier is given, the size in bytes of the character constant is 
equal to the number of characters in the constant. If a length modifier is 
provided, the result varies as follows: 

1. If the number of characters in the constant exceeds the specified 
length, as many rightmost bytes and/or bits as necessary are 
dropped. 

2. If the number of characters is less than the specified length, 
the excess rightmost bytes and/or bits are filled with blanks. 

In the following example, the length attribute of FIELD is 12: 



Name 


Operation 


Operand 


FIELD 


DC 


C TOTAL IS 110' 



However, in this next example, the length attribute is 15, and three 
blanks appear in storage to the right of the zero: 
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Name 


Operation 


Operand 


FIELD 


DC 


CL15' TOTAL IS 110' 



In the next example, the length attribute of FIELD is 12, although 13 
characters appear in the operand. The two ampersands count as only one 
byte. 



Name 


Operation 


Operand 


FIELD 


DC 


C TOTAL IS &&10' 



Note that in the next example, a length of four has been specified, 
but there are five characters in the constant. 



Name 


Operation 


Operand 


FIELD 


DC 


3CL4 'ABODE' 



The generated constant would be: 

ABCDABCDABCD 

On the other hand, if the length had been specified as six instead of 
four, the generated constant would have been: 

ABCDE ABCDE ABCDE 

Note that the same constant could be specified as a literal. 



Name 


Operation 


Operand 




MVC 


AREA(12),-3CL4'ABCDE' 



ASCII Character Constant — I : This constant is identically the same as 
the above C type constant except that an ASCII character set is used 
instead of the EBCDIC. Appendix A specifies these codes. 

Hexadecimal Constant — X : A hexadecimal constant consists of one or more 
of the hexadecimal digits, which are 0-9 and A-F. Only one hexadecimal 
constant can be specified per operand. The maximum length of a hexadecimal 
constant is 256 bytes or 512 hexadecimal digits when specified using an 
explicit length attribute (for example, HEX DC XL256*FF'). However, due to 



"^^^^^^m0^ 



i)^?&^ 



mp^ 



the assembler's syntax restriction allowing only two contintoatlon lines per 
input statement, the maximum length of an implicitly specified hexadecimal 
operand (X'FFFFFF', etc.) is 176 digits when normal statement boundaries 
are used. 

Constants that contain an even number of hexadecimal digits are trans- 
lated as one byte per pair of digits. If an odd number of digits is 
specified, the leftmost byte has the leftmost four bits filled with a 
hexadecimal zero, while the rightmost four bits contain the odd (first) 
digit. No boundary alignment is performed. 

If no length modifier is given, the implied length of the constant is 
half the number of hexadecimal digits in the constant (assuming that a 
hexadecimal zero is added to an odd number of digits) . If a length 
modifier is given, the constant is handled as follows: 

1. If the number of hexadecimal digit pairs exceeds the specified 
length, the necessary leftmost bits (and/or bytes) are dropped. 

2. If the number of hexadecimal digit pairs is less than the 
specified length, the necessary bits (and/or bytes) are added to 
the left and filled with hexadecimal zeros. 

An eight-digit hexadecimal constant provides a convenient way to set 
the bit pattern of a full binary word. The constant in the following 
example would set the first and third bytes of a word to I's: 



Name 


Operation 


Operand 


TEST 


DS 
DC 


OF 
X'FFOOFFOO' 



The DS instruction sets the location counter to a full word-boundary, 
(See DS— Define Symbol.) 

The next example uses a hexadecimal constant as a literal and inserts 
1*8 into bits 24 through 31 of register 5. 



Name 


Operation 
IC 


Operand 
5,«X*FF' 



In the following example, the digit A is dropped, because five hexa- 
decimal digits are specified for a length of two bytes: 
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Name 


Operation 


Operand 


ALPHACON 


DC 


3XL2'A6F4E' 



The resulting constant is 6F4E, which occupies the specified two 
bytes. It is duplicated three times, as requested by the duplication 
factor. If it had merely been specified as X'A6F4E* , the resulting 



constant would have a hexadecimal zero in the leftmost position. 
0A6F4E0A6FAE0A6F4E 

Binary Constant — B : A binary constant is written using I's and O's 
enclosed in apostrophes. Only one binary constant can be specified in an 
operand- Duplication and length can be specified. The maximum length of 
a binary constant is 256 bytes. 

The implied length of a binary constant is the number of bytes 
occupied by the constant including any padding necessary. Padding or 
truncation takes place on the left. The padding bit used is a 0. 



The following example shows the coding used to 
constant. BCON would have a length attribute of 1. 



designate a binary 



Name 


Operation 


Operand 


BCON 

BTRUNC 

BPAD 


DC 
DC 
DC 


B' 11011101' 
BLl '100100011' 
BLl'lOl' 



BTRUNC would assemble with the leftmost bit truncated, as follows: 
00100011 

BPAD would assemble with five zeros as padding, as follows: 
00000101 

Fixed-Point Constants — F and H : A fixed-point constant is written as a 
decimal number, which can be followed by a decimal exponent if desired. 
The number can be an integer, a fraction, or a mixed number (i.e., one with 
integral and fractional portions) . The format of the constant is as 
follows : 

1. The number is written as a signed or unsigned decimal value. The 
decimal point can be placed before, within, or after the numbe;r. 
If it is omitted, the number is assumed to be an integer. A 
positive sign is assumed if an unsigned number is specified. 
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Unless a scale modifier accompanies a mixed number or fraction, 
the fractional portion is lost, as explained under "Subfield 3: 

Modifiers." 

2. The exponent is optional. If specified, it is written 
immediately after the number as En, where n is an optionally 
signed decimal self-defining term specifying the exponent of the 
factor 10. The exponent may be in the range -85 to +75. If an 
unsigned exponent is specified, a plus sign is assumed. The 
exponent causes the value of the constant to be adjusted by the 
power of 10 that it specifies before the constant is converted to 
its binary form. The exponent may exceed the permissible range 
for exponents, provided that the sum of the exponent and the 
exponent modifier does not exceed that range. 

The number is converted to a binary number, and scaling is performed 
if specified. The binary number is then rounded and assembled into the 
proper field, according to the specified or implied length. The resulting 
number will not differ from the exact value by more than one in the last 
place. If the value of the number exceeds the length specified or implied, 
the sign is lost, the necessary leftmost bits are truncated to the length 
of the field, and the value is then assembled into the whole field. Any 
duplication factor that is present is applied after the constant is 
assembled. A negative number is carried in 2's complement form. 

An implied length of four bytes is assumed for a full-word (F) and two 
bytes for a half-word (H) , and the constant is aligned to the proper full- 
word or half-word if a length is not specified. However, any length up to 
and including eight bytes can be specified for either type of constant by 
a length modifier, in which case no boundary alignment occurs. 

of scaling, for fixed-point 





Maximum and 


minimum values, 


exclusive 


constants 


are: 






Length 


Max 


Min 




8 




2"-l 


_263 




4 




231-1 


-231 




2 




215-1 


-215 




1 




2M 


-1> 




.4 




23 -1 


-23 




.2 




2l -1 


-2l 




.1 







-1 





A field of three full-words is generated from the statement shown 
below. The location attribute of CONWRD is the address of the leftmost 
byte of the first word, and the length attribute is 4, the implied length 
for a full-word fixed-point constant. The expression CONWRD+4 could be 
used to address the second constant (second word) in the field. 



5-17 



Name 


Operation 


Operand 


CONWRD 


DC 


3F' 658474' 



The next statement causes the generation of a two-byte field 
containing a negative constant. Notice that scaling has been specified in 
order to reserve six bits for the fractional portion of the constant. 



Name 


Operation 


Operand 


HALFCON 


DC 


HS6'-25.46' 



The next constant (3.50) is multiplied by 10 to the power -2 before 
being converted to its binary format. The scale modifier reserves 12 bits 
for the fractional portion. 



Name 


Operation 


Operand 


FULLCON 


DC 


HS12'3.50E-2' 



The same constant could be specified as a literal: 



Name 


Operation 

AH 


Operand 
7,«HS12'3.50E-2* 



The final example specifies three constants. Notice that the scale 
modifier requests four bits for the fractional portion of each constant. 
The four bits are provided whether or not the fraction exists. 



Name 


Operation 


Operand 


THREECON 


DC 


FS4'10,25.3,100' 



Floating-Point Constants — E, D> and L ; A floating-point constant is 
written as a decimal number. As an option a decimal exponent may follow. 
The number may be an integer, a fraction, or a mixed number (i.e., one with 
integral and fractional portions). The format of the constant is as 
follows : 
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2. 



The number is written as a signed or unsigned decimal value. The 
decimal point can be placed before, within, or after the number. 
If it is omitted, the number is assumed to be an integer. A 
positive sign is assumed if an unsigned number is specified. 

The exponent is optional. If specified, it is written imme- 
diately after the number as En, where n is an optionally signed 
decimal value specifying the exponent of the factor 10. If an 
unsigned exponent is specified, a plus sign is assumed. The 
range of the exponent is explained under "Exponent Modifier" 
above * 

The external format for a floating-point number has two parts: the 
portion containing the exponent, which is sometimes called the 
characteristic, followed by the portion containing the fraction, which is 
sometimes called the mantissa. Therefore, the number specified as a 
floating-point constant must be converted to a fraction before it can be 
translated into the proper format. Figure 5-5 shows the external format of 
the three types of floating-point constants. 



I, HUM I TLOAT (NT, POINT NUMBf R IE) 



1 RiT 
CHAflAt, 

tfhistk; 



LCJNG Fl OATlNCi POINT NOMBEH (Dl 



7 B) t 
CHARAC- 
TtRtSTIC 



568IT FRACTION 



7 8 

FX TENDED FLOATING POINT NUMBER ID 



I 7 BIT 
S I CHARAC 
TERISTIC 



HIGH ORDER HALF OF 
112BIT FRACTION 



LOW ORDER HALF OF 
t1?BIT FHACllON 



Figure 5-5. Floating-Point External Formats 



The type L constant resembles two contiguous type D constants. In the 
type L constant the sign of the second double word is the same as the sign 
of the first. The characteristic of the second double word is equal to the 
characteristic of the first minus 14, modulo 128. For information^ on use 
of the type L constant see the *'0S Assembler (F) Programmer's Guide." 

For example, the constant 27.35E2 represents the number 27.35 times 10 
to the 2nd. Represented as a fraction, it would be .2735 times 10 to the 
4th, the exponent having been modified to reflect the shifting of the 
decimal point. The exponent may also be affected by the P^^sence of an 
exponent modifier, as explained under "Operand Subfield 3: Modifiers. 
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Thus, the exponent Is also altered before 
format • 



being translated into machine 



In machine format a floating-point niinber also has two parts, the 
signed exponent and signed fraction. The quantity expressed by this number 
is the product of the fraction and the number 16 raised to the power of the 
exponent. 

The exponent is translated into its binary equivalent in excess 64 
binary notation and the fraction is converted to a binary number. Scaling 
is performed if specified; if not, the fraction is normalized (leading 
hexadecimal zeros are removed) . Rounding of the fraction is then performed 
according to the specified or implied length, and the nximber is stored in 
the proper field. The resulting number will not differ from the exact 
value by more than one in the last place. Within the portion of the 
floating-point field allocated to the fraction, the hexadecimal point is 
assumed to be to the left of the leftmost hexadecimal digit, and the 
fraction occupies the leftmost portion of the field. Negative fractions 
are carried in true representation, not in the two*s complement form. 

An implied length of four bytes is assumed for a short (£) constant 
and eight bytes for a long (D) constant. An implied length of 16 bytes is 
assumed for an extended (L) constant. The constant is aligned at the 
proper word (E) or double word (D and L) boundary if a length is not 
specified. However, any length up to and including eight bytes (E and D) 
or 16 bytes (L) can be specified by a length modifier. In this case, no 
boundary alignment occurs. 

Any of the following statements could be used to specify 46.415 as a 
positive, full-word, floating-point constant; the last is a machine- 
instruction statement with a literal operand. Note that the last two 
constants contain an exponent modifier. 



Name 


Operation 


Operand 




DC 


E'46.415' 




DC 


E'46415E-3' 




DC 


E'+464.15E-1' 




DC 


E'+.46415E+2' 




DC 


EE2'. 46415' 




AE 


6,-EE2'.46415' 



The following would each be generated 
constants. 



as double-word floating-point 
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Name 


Operation 


Operand 


FLOAT 


DC 


DE+4'+46,-3.729,+A73' 



n.M ...l r.nnstants - P and Z ; A decimal constant is written as a signed or 
unsigned decimal value. If the sign is omitted, a plus sign is assumed. 
The decimal point may be written wherever desired or may be omitted. 
Scaling and exponent modifiers may not be specified for decimal constants. 
The maximum length of a decimal constant is 16 bytes. No word boundary 
alignment is performed. 

The placement of a decimal point in the definition does not affect the 
assembly of the constant in any way because. ^"^^^^ J^^^^^T^f "J^^^J 
floating-point constants, a decimal constant is not converted to its binary 
equivalent. The fact that a decimal constant is an integer, a fraction, or 
a mixed number is not pertinent to its generation. Furthermore, the 
lellZl point is not assembled into the constant. The programmer may 
determine proper decimal point alignment either by defining his data so 
that the point is aligned or by selecting machine-instructions that will 
operate on the data properly (i.e.. shift it for purposes of alignment). 

If zoned decimal format is specified (Z) , each decimal digit is trans- 
lated into one byte. The translation is done according to the character 
set shown in Appendix A. The rightmost byte contains the sign as "^11 as 
the rightmost digit. For packed decimal format (P) , each pair of decimal 
digits is translated into one byte. The rightmost digit and the sign are 
translated into the rightmost byte. The bit configuration for ^he digits 
is identical to the configurations for the hexadecimal digits 0-9 as shown 
in section 3 under "Hexadecimal Self-Defining Value." ^°' ^°f P^^^f ^ ^^ 
zoned decimals, a plus sign is translated into the hexadecimal digit C. and 
a minus sign into the digit D. 

If an even number of packed decimal digits is specified, one digit 
will be left unpaired because the rightmost digit is paired with the sign. 
Seief^re. in 'the leftmost byte, the leftmost four bits will be ^ 
zeros and the rightmost four bits will contain the odd (first) digit. 

If no length modifier is given, the implied length for either constant 
is the number of bytes the constant occupies (taking i";° ^^^^ ^f 
format, sign, and possible addition of "ro bits for packed decimals). If 
a length modifier is given, the constant is handled as follows. 

If the constant requires fewer bytes than the length specifies, 
the necessary number of bytes is added to the left. For zoned 
decimal format, the decimal digit zero is placed in each added 
byte. For packed decimals, the bits of each added byte are set 
to zero. 



1. 
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2. If the constant requires more bytes than the length specifies, 
the necessary number of leftmost digits or pairs of digits is 
dropped, depending on which format is specified. 

Examples of decimal constant definitions follow. 



Name 


Operation 


Operand 




DC 
DC 
DC 
DC 


P'+1.25' 
Z'-543' 
Z'79.68' 
PL3'79.68' 



The following statement specifies both packed and zoned decimal con- 
stants. The length modifier applies to each constant in the first operand 
(i.e., to each packed decimal constant). Note that a literal could not 
specify both operands. 



Name 


Operation 


Operand 


DECIMALS 


DC 


PL8'+25.8,-3874, 
+2.3',Z'+80,-3.72' 



The last example illustrates the use of a packed decimal literal. 



Name 


Operation 
UNPK 


Operand 
0UTAREA,«PL2H25' 



Address Constants : An address constant is a storage address that is trans- 
lated into a constant. Address constants can be used for initializing base 
registers to facilitate the addressing of storage. Furthermore, they 
provide a means of communicating between control sections of a multisection 
program. However, storage addressing and control section communication are 
also dependent on the use of the USING assembler instruction and the 
loading of registers. Coding examples that illustrate these considerations 
are provided in Section 3 using "Programming with the USING Instruction." 

An address constant, unlike other types of constants, is enclosed in 
parentheses. If two or more address constants are specified in an operand, 
they are separated by commas, and the entire sequence is enclosed by 
parentheses. There are five types of address constants: A, Y, S, Q and V. 
A relocatable address constant may not be specified with bit lengths. 
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Complex Relocatable Expressions ; A complex relocatable expression can only 
be used to specify an A-type or Y-type address constant. These expressions 
contain two or more unpaired relocatable terms and/or negative relocatable 
terms in addition to any absolute or paired relocatable terms that may be 
present. A complex relocatable expression might consist of external 
symbols and designate an address in an independent assembly that is to be 
linked and loaded with the assembly containing the address constant. 

A-Type Address Constant ; This constant is specified as an absolute, 
relocatable, or complex relocatable expression. (Remember that an 
expression may be single term or multiterm.) The value of the expression 
is calculated to 32 bits as explained in Section 2 with one exception: the 
maximum value of the expression may be l^'^-l. The value is then truncated 
on the left, if necessary, to the specified or implied length of the field 
and assembled into the rightmost bits of the field. The implied length of 
an A-type constant is four bytes, and alignment is to a full-word boundary 
unless a length is specified, in which case no alignment will occur. The 
length that may be specified depends on the type of expression used for the 
constant; a length of .1 to 4 bytes may be used for an absolute expression, 
while a length of only 3 or 4 may be used for a relocatable or complex 
relocatable expression. 

In the following examples, the field generated from the statement 
named ACON contains four constants, each of which occupies four bytes. 
Note that there is a location counter reference in one. The value of the 
location counter will be the address of the first byte allocated to the 
fourth constant. The second statement shows the same set of constants 
specified as literals (i.e., address constant literals). 



Name 


Operation 


Operand 


ACON 


DC 

LM 


A(108,LOP,END-STRT,*+4096) 
4,7,-A(108.LOP,END-STRT,*+4096) 



Note: When the location counter reference occurs in a literal, as in the LM 
instruction above, the value of the location counter is the address of the 
first byte of the instruction. 

Y-Tvpe Address Constant ; A Y-type address constant has much in common with 
the A-type constant. It too is specified as an absolute, relocatable, or 
complex relocatable expression. The value of the expression is also 
calculated to 32 bits as explained in Section 2. However, the maximum 
value of the expression may be only 2l5_i^ xhe value is then truncated, if 
necessary, to the specified or implied length of the field and assembled 
into the rightmost bits of the field. The implied length of a Y-type 
constant is two bytes, and alignment is to a half-word boundary unless a 
length is specified, in which case no alignment will occur. The maximum 
length of a Y-type address constant is two bytes. If length specification 
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is used, a length of two bytes may be designated for a relocatable or 
complex expression and .1 to 2 bytes for an absolute expression. 

Warning : Specification of relocatable Y-type address constants should be 
avoided in programs destined to be executed on machines having more than 
32,767 bytes of storage capacity. In any case Y-type relocatable address 
constants should not be used in programs to be executed under Operating 
System/ 360 control. 

W-Type Address Constant ; A W-type address constant is identical with the 
Y-type except that maximum value can be 2^^ as opposed to the 2^^-l allowed 
by the Y-type. 

S-Type Address Constant ; The S-type address constant is used to store an 
address in base-displacement form. 

The constant may be specified in two ways: 

1. As an absolute or relocatable expression, e.g., S(BETA) 

2. As two absolute expressions, the first of which represents the 
displacement value and the second, the base register, e.g., 
S (400 (13)). 

The address value represented by the expression in (1) will be 
converted by the assembler into the proper base register and displacement 
value. An S-type constant is assembled as a half word and aligned on a 
half-word boundary. The leftmost four bits of the assembled constant 
represents the base register designation, the remaining 12 bits the 
displacement value. 

If length specification is used, only two bytes may be specified. S- 
type address constants may not be specified as literals. 

Q-Type Address Constant (Assembler F only) : This constant is used to 
reserve storage for the offset of an external dummy section. This offset 
is added to the address of the block of storage allocated to external dummy 
sections to access the desired section. The constant is specified as a 
relocatable symbol which has been previously defined in a DXD or DSECT 
statement. The implied length of a Q-type address constant is four bytes 
and boundary alignment is to a full-word; a length of 1-4 bytes may be 
specified. No bit length specification is permitted in a Q-type constant. 
In the following example the constant VALUE has been previously defined in 
a DXD or DSECT statement. To access VALUE the value of A is added to the 
base address of the block of storage allocated for external dummy sections. 
Q-type address constants may not be specified in literals. 
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Name 


Operation 


Operand 


A 


DC 


Q (VALUE) 



V-Type Address Constant ; This constant is used to reserve storage for the 
address of an external symbol that is used for effecting branches to other 
programs. The constant may not be used for external data references within 
an overlay program. The constant is specified as one relocatable symbol, 
which need not be identified by an EXTRN statement. Whatever symbol is 
used is assumed to be an external symbol by virtue of the fact that it is 
supplied in a V-type address constant. 

To suppress the automatic library call mechanism of the linkage editor 
for a constant identified in a V-type address constant, the programmer can 
identify it in a WXTRN statement (Assenibler F only). 

Note that specifying a symbol as the operand of a V-type constant does 
not constitute a definition of the symbol for this assembly. The implied 
length of a V-type address constant is four bytes, and boundary alignment 
is to a full--word. A length modifier may be used to specify a length of 
either three or four bytes, in which case no such boundary alignment 
occurs. In the following example, 12 bytes will be reserved because there 
are three symbols. The value of each assembled constant will be zero until 
the program is loaded. It must be emphasized that a V-type address 
constant of length less than 4 can and will be processed by the Assembler 
but cannot be handled by the Linkage Editor. 



Name 


Operation 


Operand 


VCONST 


DC 


V (SORT .MERGE , CALC) 



DS ~ DEFINE STORAGE 

The DS instruction is used to reserve areas of storage and to assign 
names to those areas. The use of this instruction is the preferred way of 
symbolically defining storage for work areas, input /output areas, etc. The 
size of a storage area that can be reserved by using the DS instruction is 
limited only by the maximum value of the location counter. 
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Name 


Operation 


Operand 


Any symbol 
or blank 


DS 


One or more operands, 
separated by commas, 
written in the format 
described in the fol- 
lowing text 



The format of the DS operand is identical to that of the DC operand; 
exactly the same subfields are employed and are written in exactly the same 
sequence as they are in the DC operand. Although the formats are 
identical, there are two differences in the specification of subfields. 
They are: 

1. The specification of data (subfield 4) is optional in a DS 
operand, but it is mandatory in a DC operand. If the constant is 
specified, it must be valid. 

2. The maximum length that may be specified for character (C) and 
hexadecimal (X) field types is 65,535 bytes rather than 256 
bytes . 

If a DS operand specifies a constant in subfield 4, and no length is 
specified in subfield 3, the assembler determines the length of the data 
and reserves the appropriate amount of storage. It does not assemble the 
constant. The ability to specify data and have the assembler calculate the 
storage area that would be required for such data is a convenience to the 
programmer. If he knows the general format of the data that will be placed 
in the storage area during program execution, all he needs to do is show it 
as the fourth subfield in a DS operand. The assembler then determines the 
correct amount of storage to be reserved, thus relieving the programmer of 
length considerations . 

If the DS instruction is named by a symbol, its value attribute is the 
location of the leftmost byte of the reserved area. The length attribute 
of the symbol is the length (implied or explicit) of the type of data 
specified. Should the DS have a series of operands, the length attribute 
for the symbol is developed from the first item in the first operand. Any 
positioning required for aligning the storage area to the proper type of 
boundary is done before the address value is determined. Bytes skipped for 
alignment are not set to zero. 

Each field type (e.g., hexadecimal, character, floating-point) is 
associated with certain characteristics (these are summarized in Appendix 
F). The associated characteristics will determine which field-type code 
the programmer selects for the DS operand and what other information he 
adds, notably a length specification or a duplication factor. For example, 
the E floating-point field and the F fixed-point field both have an implied 
length of four bytes. The leftmost byte is aligned to a full-word 
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boundary. Thus, either code could be specified if it were desired to 
reserve four bytes of storage aligned to a full^ord boundary. To obtain 
a length of eight bytes, one could specify either the E or F field type 
with a length modifier of eight. However, a duplication factor would have 
to be used to reserve a larger area, because the maximum length speci- 
fication for either type is eight bytes. Note also that specifying length 
would cancel any special boundary alignment. 

In contrast, packed and zoned decimal (P and Z), character (C) , hexa- 
decimal (X), and binary (B) fields have an implied length of one byte. Any 
of these codes, if used, would have to be accompanied by a length modifier, 
unless just one byte is to be reserved. Although no alignment occurs, the 
use of C and X field types permits greater latitude in length 
specifications, the maximum for either type being 65,535 bytes. (Note that 
this differs from the maximum for these types in a DC instruction.) Unless 
a field of one byte is desired, either the length must be specified for the 
C X, P, Z, or B field types, or else the data must be specified (as the 
fourth subfield), so that the assembler can calculate the length. 



To define four 10-byte fields and one 100-byte field, 
DS statements might be as follows: 



the respective 




Although FIELD might have been specified as one 40-byte field, the 
preceding definition has the advantage of providing FIELD with a length 
attribute of 10. This would be pertinent when using FIELD as an SS 
machine-instruction operand. 

Additional examples of DS statements are shown below: 



Name 


Operation 


Operand 


ONE 

TWO 

THREE 

FOUR 

FIVE 


DS 
DS 
DS 
DS 
DS 


CL80(one 80-byte field, 

length attribute of 80 
80C(80 one-byte fields, 

length attribute of one 
6F(six full words, length 

attribute of four) 
D(one double word, length 

attribute of eight) 
4H(four half -words, length 

attribute of two) 



L. 
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Note: A DS statement causes the storage area to be reserved but not set to 
zeros. No assumption should be made as to the contents of the reserved 
area. 

Special Uses of the Duplication Factor 

FORCING ALIGNMENT ; The location counter can be forced to a double-word, 
full-word, or half-word boundary by using the appropriate field type (e.g., 
D, F, or H) with a duplication factor of zero. This method may be used to 
obtain boundary alignment that otherwise would not be provided. For 
example, the following statements would set the location counter to the 
next double-word boundary and then reserve storage space for a 128-byte 
field (whose leftmost byte would be on a double-word boundary). 



Name 


Operation 


Operand 


AREA 


DS 
DS 


OD 
CL128 



DEFINING FIELDS OF AN AREA : A DS instruction with a duplication factor of 
zero can be used to assign a name to an area of storage without actually 
reserving the area. Additional DS and/or DC instructions may then be used 
to reserve the area and assign names to fields within the area (and 
generate constants if DC is used) . 

For example, assume that 80-character records are to be read into an 
area for processing and that each record has the following format: 



Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-54 
Positions 55-62 



Payroll Number 

Employee Name 

Date 

Gross Wages 

Withholding Tax 



The following example illustrates how DS instructions might be used to 
assign a name to the record area, then define the fields of the area and 
allocate the storage for them. Note that the first statement names the 
entire area by defining the symbol RDAREA; the statement gives RDAREA a 
length attribute of 80 bytes, but does not reserve any storage. Similarly, 
the fifth statement names a six-byte area by defining the symbol DATE; the 
three subsequent statements actually define the fields of DATE and allocate 
storage for them. The second, ninth, and last statements are used for 
spacing purposes and, therefore, are not named. 
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Name 


Operation 


Operand 


RDAREA 


DS 


0CL80 




DS 


CL4 


PAYNO 


DS 


CL6 


NAME 


DS 


CL20 


DATE 


DS 


0CL6 


DAY 


DS 


CL2 


MONTH 


DS 


CL2 


YEAR 


DS 


CL2 




DS 


CLIO 


GROSS 


DS 


CL8 


FEDTAX 


DS 


CL8 




DS 


CL18 



LISTING CONTROL INSTRUCTIONS 

The listing control instructions are ' used to identify an assembly 
listing and assembly output cards, to provide blank lines in an assembly 
listing, and to designate how much detail is to be included in an assembly 
listing. In no case are instructions or constants generated in the object 
program. Listing control statements with the exception of PRINT are not 
printed in the listing. 

NOTE: TITLE, SPACE, and EJECT statements will not appear in the source 
listing unless the statement is continued onto another card. Then the 
first card of the statement is printed. However, any of these three types 
of statements, if generated as macro instruction expansion, will never be 
listed regardless of continuation. 

TITLE ~ IDENTIFY ASSEMBLY OUTPUT 

The TITLE instruction enables the programmer to identify the assembly 
listing and assembly output cards. The format of the TITLE instruction 
statement is as follows: 



Name 


Operation 


Operand 


Special, 
sequence 
or variable 
symbol or 
blank 


TITLE 


A sequence of char- 
acters, enclosed in 
apostrophes 



The name field may contain a special symbol of from one to four 
alphabetic or numeric characters in any combination. The contents of the 
name field are punched into columns 73-76 of all the output cards for the 
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program except those produced by the PUNCH and REPRO assembler 
instructions. Only the first TITLE statement in a program may have a 
special symbol or a variable symbol in the name field. The name field of 
all subsequent TITLE statements must contain either a sequence symbol or a 
blank. 

The operand field may contain up to 100 characters enclosed in apos- 
trophes. Special consideration must be given to representing apostrophes 
and ampersands as characters. Each single apostrophe or ampersand desired 
as a character in the constant must be represented by a pair of apostrophes 
or ampersands. Only one apostrophe or ampersand appears in storage. The 
contents of the operand field are printed at the top of each page of the 
assembly listing. 

A program may contain more than one TITLE statement. Each TITLE 
statement provides the heading for pages in the assembly listing that 
follow it, until another TITLE statement is encountered. Each TITLE 
statement causes the listing to be advanced to a new page (before the 
heading is printed) . 



For example, if the following statement is the first 
to appear in a program: 



TITLE statement 



Name 


Operation 


Operand 


PGMl 


TITLE 


'FIRST HEADING' 



then PGMl is punched into all of the output cards (columns 73-76) and this 
heading appears at the top of each subsequent page: PGMl FIRST HEADING. 

If the following statement occurs later in the same program: 



Name 


Operation 


Operand 




TITLE 


'A NEW HEADING' 



then, PGMl is still punched into the output cards, but each following page 
begins with the heading: PGMl A NEW HEADING. 

Note: The sequence number of the cards in the output deck is contained in 
columns 77-80. 

EJECT ~ START NEW PAGE 

The EJECT instruction causes the next line of the listing to appear at 
the top of a new page. This instruction provides a convenient way to 
separate routines in the program listing. The format of rhe FTECT 
instruction statement is as follows: 
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Name 


Operation 


Operand 


A sequence 
symbol or 
blank 


EJECT 


Not used; should be 
blank 



If the line before the EJECT statement appears at the bottom of a 
page, the EJECT statement has no effect. Two EJECT statements may be used 
in succession to obtain a blank page. A TITLE instruction followed 
immediately by an EJECT instruction will produce a page with nothing but 
the operand entry (if any) of the TITLE instruction. Text following the 
EJECT instruction will begin at the top of the next page. 

SPACE ~ SPACE LISTING 

The SPACE instruction is used to insert one or more blank lines in the 
listing. The format of the SPACE instruction statement is as follows: 



Name 


Operation 


1 

Operand 


A sequence 
symbol 
or blank 


SPACE 


A decimal value or 
blank 



A decimal value is used to specify the number of blank lines to be 
inserted in the assembly listing. A blank operand causes one blank line to 
be inserted. If this value exceeds the number of lines remaining on the 
listing page, the statement will have the same effect as an EJECT 
statement. 



PRINT ~ PRINT OPTIONAL DATA 

The PRINT instruction is used to control printing of 
listing. The format of the PRINT instruction statement is: 



the assembly 



Name 


Operation 


Operand 


A sequence 
symbol or 
blank 


PRINT 


One to three 
operands 



The one to three operands may include an operand from each of the 
following groups in any sequence: 



1. 



ON 



A listing is printed. 
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2. 



3, 

4. 



OFF 
GEN 

NOGEN 



DATA 
NODATA 



No listing is printed. 

All statements generated by macro-instructions are 
printed. 

Statements generated by macro-instructions are not 
printed with the exception of MNOTE, which will 
print regardless of NOGEN . However , the macro- 
instruction itself will appear in the listing. 

Constants are printed out in full in the listing. 

Only the leftmost eight bytes are printed on the 
listing. 



A program may contain any number of PRINT statements. A PRINT 
statement controls the printing of the assembly listing until another PRINT 
statement is encountered. Each option remains in effect until the corres- 
ponding opposite option is specified. 

Until the first PRINT statement (if any) is encountered, the following 
is assumed: 



Name 


Operation 


Operand 




PRINT 


ON, NODATA, GEN 



For example, if the statement: 



Name 


Operation 


Operand 




DC 


XL256'00' 



appears in a program, 256 bytes of zeros are assembled. If the statement; 



Name 


Operation 


Operand 




PRINT 


DATA 



is the last PRINT statement to appear before the DC statement, all 256 
bytes of zeros are printed in the assembly listing. However, if: 
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Name 


Operation 


Operand 




PRINT 


NODATA 



is the last PRINT statement to appear before the DC statement, only eight 
bytes of zeros are printed In the assembly listing. 

Whenever an operand is omitted, it is assumed to be unchanged and 
continues according to its last specification. 

The hierarchy of print control statements is: 

1. ON and OFF 

2. GEN and NOGEN 

3. DATA and NODATA 

Thus with the following statement nothing would be printed. 



Name 


Operation 


Operand 




PRINT 


OFF,DATA,GEN 



PROGRAM CONTROL INSTRUCTIONS 

The program control instructions are used to specify the end of an 
assembly, to set the location counter to a value or word boundary, to 
insert previously written coding in the program, to specify the placement 
of literals in storage, to check the sequence of input cards, to indicate 
statement format, and to punch a card. Except for the CNOP and COPY 
instructions, none of these assembler instructions generate instructions or 
constants in the object program. 

ICTL ~ INPUT FORMAT CONTROL 

The ICTL instruction allows the programmer to alter the normal format 
of his source program statements. The ICTL statement must precede all 
other statements in the source program and may be used only once. The 
format of the ICTL instruction statement is as follows: 
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Name 


Operation 


Operand 


Blank 


ICTL 


1-3 decimal self- 
defining values of 
the form b,e,c 



Operand b specifies the begin column of the source statement. It must 
always be specified, and must be within 1-40, Inclusive, Operand e 
specifies the end column of the source statement. The end column, when 
specified, must be within 41-80, inclusive; when not specified, it is 
assumed to be 71. The end column must not be less than the begin column 
+5. The column after the end column is used to indicate whether the next 
card is a continuation card. Operand c specifies the continue column of 
the source statement. The continue column, when specified, must be within 
2-40 and must be greater than b. If the continue column is not specified, 
or if column 80 is specified as the end column, the assembler assumes that 
there are no continuation cards, and all statements are contained on a 
single card. The operand forms b,,c and b, are invalid. 



If no ICTL statement is used in 
assumes that 1, 71, and 16 zre 
respectively. 



the source program, the assembler 
the begin, end, and continue columns. 



The next example designates the begin column as column 25. Since the 

end column is not specified, it is assumed to be column 71. No 

continuation cards are recognized because the continue column is not 
specified. 



Name 


Operation 


Operand 




ICTL 


25 



ISEQ ~ INPUT SEQUENCE CHECKING 

The ISEQ instruction is used to check the sequence of input cards. (A 
sequence error is considered serious, but the assembly is not terminated.) 
The format of the ISEQ instruction statement is as follows: 



Name 


Operation 


Operand 


Blank 


ISEQ 


Two decimal self- 
defining values of 
the form l,r;or blank 
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The operands 1 and r, respectively, specify the leftmost and rightmost 
columns of the field in the input cards to be checked. Operand r must be 
equal to or greater than operand 1. Columns to be checked must not be 
between the begin and end columns • 

Sequence checking begins with the first card following the ISEQ 
statement. Comparison of adjacent cards makes use of the eight-bit 
internal collating sequence. (See Appendix A.) Each card checked must be 
higher than the preceding card. 

An ISEQ statement with a blank operand terminates the operation. 
(Note that this ISEQ statement is also sequence checked.) Checking may be 
resumed with another ISEQ statement. 

Sequence checking is only performed on statements contained in the 
source program. Statements inserted by the COPY assembler-instruction or 
generated by a macro-instruction are not checked for sequence. Also macro- 
definitions in a macro library are not checked. 



PUNCH ~ PUNCH A CARD 

The PUNCH assembler-instruction causes the data in the operand to be 
punched into a card. One PUNCH statement produces one punched card. As 
many PUNCH statements may be used as are necessary. The format is: 



Name 

A sequence 
symbol or 
blank 


Operation 


Operand 


PUNCH 


1 to 80 characters 
enclosed in apos- 
trophes 



Using character representation, the operand is written as a string of 
up to 80 characters enclosed in apostrophes. All characters, including 
blank, are valid. The position immediately to the right of the left 
apostrophe is regarded as column one of the card to be punched. 
Substitution is performed for variable symbols in the operand. Special 
consideration must be given to representing apostrophes and ampersands as 
characters. Each apostrophe or ampersand desired as a character in the 
constant must be represented by a pair of apostrophes or ampersands. Only 
one apostrophe or ampersand appears in storage. 

PUNCH statements may occur anywhere within a program, except before 
macro definitions. They may occur within a macro definition but not 
between the end of a macro definition and the beginning of the next macro 
definition. If a PUNCH statement occurs before the first control section, 
the resultant card will precede all other cards in the object program card 
deck; otherwise the card will be punched in place. No sequence number or 
identification is punched in the card. 
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REPRO ~ REPRODUCE FOLLOWING CARD 

The REPRO assembler-instruction causes data on the following statement 
line to be punched into a card. The data is not processed; it is punched 
in a card, and no substitution is performed for variable symbols. No 
sequence number or identification is punched on the card. One REPRO 
instruction produces one punched card. The REPRO instruction may not 
appear before a macro definition. REPRO statements that occur before all 
statements composing the first or only control section will punch cards 
which precede all other cards of the object deck. The format is; 



Name 


Operation 


Operand 


A sequence 
symbol or 
blank 


REPRO 


Blank 



The line to be reproduced may contain any combination of up to 80 
valid characters. Characters may be entered starting in column 1 and 
continuing through column 80 of the line. Column 1 of the line corresponds 
to column 1 of the card to be punched. 

ORG ~ SET LOCATION COUNTER 

The ORG instruction is used to alter the setting of the location 
counter for the current control section. The format of the ORG instruction 
statement is: 



Name 


Operation 


1 — 

Operand 


A sequence 
symbol or 
blank 


ORG 


A relocatable ex- 
pression or blank 



Any symbols in the expression must have been previously defined. The 
unpaired relocatable symbol must be defined in the same control section in 
which the ORG statement appears. 

The location counter is set to the value of the expression in the 
operand. If the operand is omitted, the location counter is set to the 
next available (unused) location for that control section. 

An ORG statement cannot be used to specify a location below the 
beginning of the control section in which it appears. The following is 
invalid if it appears less than 500 bytes from the beginning of the current 
control section. 
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Name 


Operation 


Operand 




ORG 


*-500 



If it is desired to reset the location counter to the next available 
byte in the current control section, the following statement would be used: 



Name 


Operation 


Operand 




ORG 





If previous ORG statements have reduced the location counter for the 
purpose of redefining a portion of the current control section, an ORG 
statement with an omitted operand can then be used to terminate the effects 
of such statements and restore the location counter to its highest setting. 

Note ; Through use of the ORG statement two instructions may be given the 
same location counter values. In such a case the second instruction will 
not always eliminate the effects of the first instruction. Consider the 
following example: 



ADDR 



B 



DC A (LOG) 

ORG *-4 

DC C'BETA' 



In this example the value of B (BETA) will be destroyed by the relocation 
of ADDR during linkage editing. 

LTORG — BEGIN LITERAL POOL 

The LTORG instruction causes all literals since the previous LTORG (or 
statt of the program) to be assembled at appropriate boundaries starting at 
the first double-word boundary following the LTORG statement. If no 
literals follow the LTORG statement, alignment of the next instruction 
(which is not an LTORG instruction) will occur. Bytes skipped are not 
zeroed. The format of the LTORG instruction statement is: 



Name 


Operation 


Operand 


Symbol 
or Blank 


LTORG 


Not Used 



The symbol represents the address of the first byte of the literal 
pool. It has a length attribute of 1. 
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[VC 


A(12),-3F'l' 


(4) 


SH 


3,-H'2' 




LM 


0,3,=2F'1,2' 


(8) 


IC 


2,-XLl'l' 




AD 


2,-D'2' 


® 



The literal pool is organized into four segments within which the 
literals are stored in order of appearance, dependent on the divisibility 
properties of their object lengths (dup factor times total explicit or 
implied length). The first segment contains all literals whose object 
length is a multiple of eight. Those remaining literals with lengths 
divisible by four are stored in the second segment. The third segment 
holds the remaining even- length literals. Any literals left over have odd 
lengths and are stored in the fourth segment. 

Since each literal pool begins at a double-word boundary, this 
guarantees that all segment one literals are double-word, segment two full- 
word, and segment three half-word aligned, with no space wasted except, 
possibly, at the pool origin. 

Literals from the following statement are in the pool, in the segments 
indicated by the circled numbers, where (g) means multiple of eight, etc.. 

Special Addressing Consideration 

Any literals used after the last LTORG statement in a program are 
placed at the end of the first control section. If there are no LTORG 
statements in a program, all literals used in the program are placed at the 
end of the first control section. In these circumstances the programmer 
must ensure that the first control section is always addressable. This 
means that the base address register for the first control section should 
not be changed through usage in subsequent control sections. If the 
programmer does not wish to reserve a register for this purpose, he may 
place an LTORG statement at the end of each control section thereby 
ensuring that all literals appearing in that section are addressable. 

Duplicate Literals 

If duplicate literals occur within the range controlled by one LTORG 
statement, only one literal is stored. Literals are considered duplicates 
only if their specifications are identical. A literal will be stored, even 
if it appears to duplicate another literal, if it is an A-type address 
constant containing any reference to the location counter. 

The following examples illustrate how the assembler stores pairs of 
literals, if the placement of each pair is controlled by the same LTORG 
statement. 

X'FO' 

Both are stored 
CO' 
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XL3'0' 

HL3'0' 

A(*+4) 

A(*+4) 

X'FFFF' 

X»FFFF' 



Both are stored 



Both are stored 



Identical; the first is stored 



CNOP ~ CONDITIONAL NO OPERATION 

The CNOP instruction allows the programmer to align an instruction at 
a specific half-^ord boundary. If any bytes must be skipped in order to 
align the instruction properly, the assembler ensures an unbroken 
instruction flow by generating no-operation instructions. This facility is 
useful in creating calling sequences consisting of a linkage to a 
subroutine followed by parameters such as channel command words (CCW) • 

The CNOP instruction ensures the alignment of the location counter 
setting to a half-word, word, or double^word boundary. If the location 
counter is already properly aligned, the CNOP instruction has no effect. 
If the specified alignment requires the location counter to be incremented, 
one to three no-operation instructions are generated, each of which uses 
two bytes. 

The format of the CNOP instruction statement is as follows: 



Name 


Operation 


Operand 


A sequence 
symbol or 
blank 


CNOP 


Two absolute ex- 
pressions of the 
form b,w 



Any symbols used in the expressions in the 
been previously defined. 



operand field must have 



Operand b specifies at which byte in a word or double word the 
location counter is to be set; b can be 0, 2, 4, or 6. Operand w specifies 
whether byte b is in a word (w»4) or double word (w»8) . The following 
pairs of b and w are valid: 
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b,v Specifies 

0,4 Beginning of a word 

2,4 Middle of a word 

0,8 Beginning of a double word 

2,8 Second half-word of a double-word 

4,8 Middle (third half-word) of a double-word 

6,8 Fourth half-word of a double-word 

Figure 5-6 shows the position In a double word that each of these 
pairs specifies. Note that both 0,4 and 2,4 specify two locations In a 
double-word. 





Double 


Word 


Word 


Word 


Half Word 


Half Word 


Half Word 


Half Word 


Byte Byte 




Byte Byte 


Byte Byte 


Byte Byte 


0,4 
0,8 


2.4 
2.8 


0,4 2,4 
4,8 6,8 



Figure 5-6. CNOP Alignment 

Assume that the location counter Is currently aligned at a double-word 
boundary. Then the CNOP Instruction In this sequence: 



Name 


Operation 


Operand 




CNOP 
BALR 


0,8 
2,14 



has no effect; It Is merely printed In the assembly listing, 
sequence : 



However, this 



Name 


Operation 


Operand 




CNOP 
BALR 


6,8 
2,14 



causes three branch-on-condltlons (no-operatlons) to be generated, thus 
aligning the BALR Instruction at the last half-word In a double-word as 
follows: 
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Name 


Operation 


Operand 




BCR 
BCR 
BCR 
BALR 


0,0 
0,0 
0,0 
2,14 



A£ter the BALR instruction Is generated, the location counter Is at 
double-word boundary, thereby ensuring an unbroken Instruction flow. 



COPY ~ COPY PREDEFINED SOURCE CODING 

The COPY Instruction obtains source-language coding from a library and 
Includes It In the program currently being assembled. The format of the 
COPY Instruction statement Is as follows: 



Name 
Blank 



Operation 



COPY 



Operand 



One symbol 



The operand Is a symbol that Identifies a partitioned data set member 
to be copied from either the system macro library or a user library 
concatenated to It. Inserting code In the library to be copied later Is 
performed by the lEBUPDAT or lEBUPDTE routines, details of which are 
covered In the "OS Utilities." 

The assembler Inserts the requested coding Immediately after the COPY 
statement Is encountered. The requested coding may not contain any COPY, 
END, ICTL, ISEQ, MACRO, or MEND statements. 

If Identical COPY statements are encountered, the coding they request 
Is brought Into the program each time. All statements Included In the 
program via COPY are processed using the standard format regardless of any 
ICTL Instructions In the program. (For a further discussion -of COPY see 
Section 7.) 



END ~ END ASSEMBLY 

The END Instruction terminates the assembly of a program. It may also 
designate a point in the program or in a separately assembled program to 
which control may be transferred after the program is loaded. The END 
instruction must always be the last statement in the source program. A 
literal may not be used. If an external symbol Is used in the expression, 
the value of the expression must be 0. 
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The format of the END instruction statement is as follows: 



Name 


Operation 


Operand 


Blank 


END 


A relocatable ex- 
pression or blank 



The operand specifies the point to which control may be transferred 
when loading is complete. This point is usually the first machine- 
instruction in the program, as shown in the following sequence. 



Name 


Operation 


Operand 


NAME 
AREA 
BEGIN 


1 

CSECT 

DS 
BALR 

USING 

• 
• 

END 


50F 
2,0 
*,2 

BEGIN 



Note: Editing errors in system macro definitions (macro definitions 
included in a macro library) are discovered when the macro definitions are 
read from the macro library. This occurs after the END statement has been 
read. They will therefore be flagged after the END statement. If the 
programmer does not know which of his system macros caused an error, it is 
necessary to punch all system macro definitions used in the program, 
including inner macro definitions, and insert them in the source program as 
programmer macro definitions, since programmer macro definitions are 
flagged in-line. To aid in debugging it is advisable to test all macro 
definitions as programmer macro definitions before incorporating them in 
the library as system macro definitions. 
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PART II — THE MACRO LANGUAGE 

SECTION 6: INTRODUCTION TO THE MACRO LANGUAGE 

SECTION 7: HOW TO PREPARE MACRO DEFINITIONS 

SECTION 8: HOW TO WRITE MACRO INSTRUCTIONS 

SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 

SECTION 10: EXTENDED FEATURES OF THE MACRO LANGUAGE 



SECTION 6; INTRODUCTION TO THE MACRO LANGUAGE 

The Operating System/360 macro language is an extension of the 
Operating System/360 assembler language. It provides a convenient way to 
generate a desired sequence of assembler language statements many times in 
one or more programs. The macro-definition is written only once, and a 
single statement, a macro-instruction statement, is written each time a 
programmer wants to generate the desired sequence of statements. 

This facility simplifies the coding of programs, reduces the chance of 
programming errors, and ensures that standard sequences of statements are 
used to accomplish desired functions. 

An additional facility, called conditional assembly, allows one to 
code statements which may or may not be assembled, depending upon 
conditions evaluated at assembly time. These conditions are usually tests 
of values, which may be defined, set, changed, and tested during assembly. 
The conditional assembly facilty may be used without using macro- 
instruction statements. 

THE MACRO-INSTRUCTION STATEMENT 

A macro-instruction statement (hereafter called a macro-instruction) 
is a source program statement. The assembler generates a sequence of 
assembler language statements for each occurrence of the same macro- 
instruction. The generated statements are then processed like any other 
assembler language statement. 

Macro -instructions can be tested by placing them before the assembly 
cards of a test program. 

Three types of macro-instructions may be written. They are 
positional, keyword, and mixed-mode macro-instructions. Positional macro- 
instructions permit the programmer to write the operands of a macro- 
instruction in a fixed order . Keyword macro-instructions permit the 
programmer to write the operands of a macro-instruction in a variable 
order. Mixed-mode macro-instructions permit the programmer to use the 
features of both positional and keyword macro- instructions in the same 
macro- instruct ion. 

THE MACRO-DEFINITION 

A macro-definition is a set of statements that provides the assembler 
with: (1) the mnemonic operation code and the format of the macro- 
instruction, and (2) the sequence of statements the assembler generates 
when the macro- instruction appears in the source program. 

Every macro-definition consists of a macro-definition header 
statement, a macro-instruction prototype statement, one or more model 
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statements, COPY statements, MEXIT, MNOTE, or conditional assembly 
instructions, and a macro-definition trailer statement. 

The macro-definition header and trailer statements indicate to the 
assembler the beginning and end of a macro-definition. 

The macro-instruction prototype statement specifies the mnemonic 
operation code and the type of the macro-instruction. 

The model statementr> are used by the assembler to generate the 
assembler language statements that replace each occurrence of the macro- 
instruction. 

The COPY statements may be used to copy model statements, MEXIT, MNOTE 
or conditional assembly instructions from a system library into a macro- 
definition. 

The MEXIT instruction can be used to terminate processing of a macro- 
definition. 

The MNOTE instruction can be used to generate an error message when 
the rules for writing a particular macro- instruction are violated. 

The conditional assembly instructions may be used to vary the sequence 
of statements generated for each occurrence of a macro-instruction. 
Conditional assembly instructions may also be used outside macro- 
definitions, i.e., among the assembler language statements in the program. 

THE MACRO LIBRARY 

The same macro-definition may be made available to more than one 
source program by placing the macro-definition in the macro library. The 
macro library is a collection of macro-definitions that can be used by all 
the assembler language programs in an installation. Once a macro- 
definition has been placed in the macro library it may be used by writing 
its corresponding macro-instruction in a source program. Macro-definitions 
must be in the system macro library under the same name as the prototype. 
The procedure for placing macro -definitions in the macro library is 
described in the Utilities publication. 

SYSTEM AND PROGRAMMER MACRO-DEFINITIONS 

A macro-definition included in a source deck is called a programmer 
macro^eflnltlon. One residing in a macro library is called a system macro- 
definition. There is no difference in function. If a programmer macro is 
included in a macro library, it becomes a system macro-definition, and if 
a system macro -definition is punched and included in a source deck it 
becomes a programmer macro-definition. 
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System and programmer macros will be expanded the same, but syntax 
errors are handled differently. In programmer macros, error messages are 
attached to the statements in error. In system macros, however, error 
messages cannot be associated with the statement in error because these 
macros are located and edited after the entire source deck has been read. 
Therefore, the error messages are associated with the END statement. 

Because of the difficulty of finding syntax errors in system macros, 
a macro-definition should be run and "debugged" as a programmer macro 
before it is placed in a macro library. 

SYSTEM MACRO INSTRUCTIONS 

The macro-instructions that correspond to macro-definitions prepared 
by IBM are called system macro-instructions. System macro-instructions are 
described in "OS Supervisor Services and Macro Instructions," and "OS Data 
Management Macro Instructions." 

VARYING THE GENERATED STATEMENTS 

Each time a macro- instruction appears in the spurce program it is 
replaced by the same sequence of assembler language statements. 
Conditional assembly instructions, however, may be used to vary the number 
and format of the generated statements. 

VARIABLE SYMBOLS 

A variable symbol is a type of symbol that is assigned different 
values by either the programmer of the assembler. When the assembler uses 
a macro-definition to determine what statements are to replace a macro- 
instruction, variable symbols in the model statements are replaced with the 
values assigned to them. By changing the values assigned to variable 
S3mibols the programmer can vary parts of the generated statements. 

A variable symbol is written as an ampersand followed by from one 
through seven letters and/or digits, the first of which must be a letter. 
Elsewhere, two ampersands must be used to represent an ampersand. 

Types of Variable Symbols 

There are three types of variable symbols: Symbolic parameters, 
system variable symbols, and SET symbols. The SET symbols are further 
broken down into SETA symbols, SETB sjmibols, and SETC symbols. The three 
types of variable symbols differ in the way they are assigned values. 

Assigning Values to Variable Symbols 

Symbolic parameters are assigned values by the programmer each time he 
writes a macro- instruction. 
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System variable symbols are assigned values by the assembler each time 
it processes a macro-instruction. 

SET symbols are assigned values by the programmer by means of 
conditional assembly instructions. 

Global SET Symbols 

The values assigned to SET symbols in one macro-definition may be used 
to vary the statements that appear in other macro-definitions. All SET 
symbols used for this purpose must be defined by the programmer as global 
SET symbols. All other SET symbols (i.e., those which may be used to vary 
statements that appear in the same macro-definition) must be defined by the 
programmer as local SET symbols. Local SET symbols and the other variable 
symbols (that is, symbolic parameters and system variable symbols) are 
local variable symbols. Global SET symbols are global variable symbols. 

ORGANIZATION OF THIS PART OF THE PUBLICATION 

Sections 7 and 8 describe the basic rules for preparing macro- 
definitions and for writing macro-instructions. 

Section 9 describes the rules for writing conditional assembly 
instructions. 

Section 10 describes additional features of the macro language, 
including rules for defining global SET symbols, preparing keyword and 
mixed-mode macro-definitions, and writing keyword and mixed-mode macro- 
instructions. 

Appendix G contains a reference summary of the entire macro language. 

Examples of the features of the language appear throughout the 

remainder of the publication. These examples illustrate the use of 

particular features. However, they are not meant to show the full 
versatility of these features. 
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SECTION 7: HOW TO PREPARE MACRO-DEFINITIONS 

A macro-definition consists of: 

1. A macro-definition header statement. 

2. A macro- instruction prototype statement. 

3. Zero or more model statements, COPY statements, MEXIT, MNOTE, or 
conditional assembly instructions. 

4. A macro-definition trailer statement. 

Except for MEXIT, MNOTE, and conditional assembly instructions, this 
section of the publication describes all of the statements that may be used 
to prepare macro-definitions. Conditional assembly instructions are de- 
scribed in Section 9. MEXIT and MNOTE instructions are described in 
Section 10. 

Macro-definitions appearing in a source program must appear before all 
PUNCH and REPRO statements and all statements which pertain to the first 
control section. Specifically, only the listing control instructions 
(EJECT, PRINT, SPACE, and TITLE), OPSYN, ICTL, and ISEQ instructions, and 
comments statements can occur before the macro-definitions. All but the 
ICTL and OPSYN instruction can appear between macro-definitions if there is 
more than one definition in the source program. Conditional assembly, 
substitution, and sequence symbols cannot be used in front of or between 
macro definitions. 

A macro-definition cannot appear within a macro-definition and the 
maximum number of continuation cards for a macro-definition statement is 
two. 

MACRO — MACRO-DEFINITION HEADER 

The macro-definition header statement indicates the beginning of a 
macro-definition. It must be the first statement in every macro- 
definition. The format of this statement is: 



Name 


Operation 


Operand 


Blank 


MACRO 


Blank 



MEND — MACRO-DEFINITION TRAILER 

The macro-definition trailer statement indicates the end of a macro- 
definition. It can appear only once within a macro-definition and must be 
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the last statement in every macro-definition, 
is: 



The format of this statement 



Name 



Operation 



Operand 



A se- 
quence 
symbol 
or 
blank 



MEND 



Blank 



-X- 



MACRO INSTRUCTION PROTOTYPE 

The macro-ins true t ion prototype statement (hereafter called the 
prototype statement) specifies the mnemonic operation code and the format 
of all macro-instructions that refer to the macro-definition. It must be 
the second statement of every macro-definition. The format of this 
statement is: 



Name 


Operation 


Operand 


A symbolic 
parameter 
or blank 


A symbol 


One or more sym- 
bolic parameters 
separated by com- 
mas, or blank 



The symbolic parameters are used in the macro-definition to represent 
the name field and operands of the corresponding macro-instruction. A 
description of symbolic parameters appears under "Symbolic Parameters" in 
this section. 



The name field of the prototype statement may 
contain a symbolic parameter. 



be blank, or it may 



The symbol in the operation field is the mnemonic operation code that 
must appear in all macro-instructions that refer to this macro-definition. 
The mnemonic operation code must not be the same as the mnemonic operation 
code of another macro-definition in the source program or of a machine or 
assembler instruction as listed in Appendix G. 

The operand field may contain to 200 symbolic parameters separated 
by commas. If there are no symbolic parameters, comments may not appear. 

The following Is an example of a prototype statement. 
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Name 


Operation 


Operand 


&NAME 


MOVE 
1 


&TO,&FROM 



Statement Format 

The prototype statement may be written in a format different from that 
used for assembler language statements. The normal format is described in 
Part I of this publication. The alternate format described here allows the 
programmer to write an operand on each line, and allows the interspersing 
of operands and comments in the statement. 

In the alternate format, as in the normal format, the name and 
operation fields must appear on the first line of the statement, and at 
least one blank must follow the operation field on that line. Both types 
of statement formats may be used in the same prototype statement. 

The rules for using the alternate statement format are: 

1. If an operand is followed by a comma and a blank, and the column 
after the end column contains a nonblank character, the operand 
field may be continued on the next line starting in the continue 
column. More than one operand may appear on the same line. 



Comments may appear after the blank that indicates the end of 
operand, up to and including the end column. 



an 



3. If the next line starts after the continue column, the 
information entered on the next line is considered comments, and 
the operand field is considered terminated. Any subsequent 
continuation lines are considered comments. 

The following examples illustrate: (1) the normal statement format, 
(2) the alternate statement format, and (3) a combination of both statement 
formats. 
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Name 


Operation 


Operand Comments 




NAMEl 


OPl 


OPERANDI , 0PERAND2 , OPERAN 
D3 THIS IS THE NORMAL 
STATEMENT FORMAT 


X 

X 


NAME2 


OP 2 


OPERANDI, THIS IS THE AL 
0PERAND2 , OPERANDS TERNA 
TE STATEMENT FORMAT 


X 
X 


NAME3 


0P3 


OPERANDI, THIS IS A COMB 
0PERAND2 , OPERANDS , OPERAN 
D4, OPERANDS INATION OF 
BOTH STATEMENT FORMATS 


X 
X 
X 



MODEL STATEMENTS 

Model statements are the macro-definition statements from which the 
desired sequences of assembler language statements are generated. Zero or 
nore model statements may follow the prototype statement. A model state- 
ment consists of one to four fields. They are, from left to right, the 
name, operation, operand, and comments fields. 

The fields in the model statement must correspond to the fields in the 
generated statement. It is not possible to generate blanks to separate 
statement fields. 

Model statement fields must follow the rules for paired apostrophes, 
ampersands, and blanks as macro-instruction operands (see "Macro- 
Instruction Operands" in Section 8) . 

Though model statements must follow the normal continuation card 
conventions, statements generated from model statements may have more than 
two continuation lines. Substituted statements may not have blanks in any 
field except between paired apostrophes. They may not have leading blanks 
in the name field. 

Name Field 

The name field may be blank or it may contain an ordinary symbol, a 
variable symbol, or a sequence symbol. It may also contain an ordinary 
symbol concatenated with a variable symbol or a variable symbol 
concatenated with one or more other variable symbols. 

Variable symbols may not appear in the name field of ACTR, COPY, END, 
ICTL, ISEQ, or OPSYN statements. The characters * and .* may not be 
substituted for a variable symbol. 
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Operation Field 

The operation field may contain a machine instruction, an assembler 
instruction listed in Section 5 (except END, ICTL, ISEQ, OPSYN, or PRINT), 
a macro instruction, or variable symbol. It may also contain an ordinary 
symbol concatenated with a variable symbol or a variable symbol 
concatenated with one or more other variable symbols. 

Variable symbols may not be used to generate 

• Macro Instructions 

• Macro prototypes 

• The following instructions: 



ACTR 


GBLA 


MEXIT 


AGO 


GBLB 


MNOTE 


AIF 


GBLC 


OPSYN 


ANOP 


ICTL 


PRINT 


COPY 


ISEQ 


REPRO 


CSECT 


LCLA 


SETA 


DSECT 


LCLB 


SETB 


END 


LCLC 


SETC 




MACRO 


START 




MEND 





Variable symbols may also be used outside of macro-definitions to generate 
mnemonic operation codes with the preceding restrictions. 

The use of COPY instructions is described under "COPY Statements". 

Variable symbols in the line following a REPRO instruction, will not 
be replaced by their values. 

Operand Field 

The operand field may contain ordinary symbols or variable symbols. 
However, variable symbols may not be used in the operand field of COPY, 
ICTL, ISEQ, or OPSYN instructions. 

Comments Field 

The comments field may contain any combination of characters. No 
substitution is performed for variable symbols appearing in the comments 
field. Only generated statements will be printed in the listing. 
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SYMBOLIC PARAMETERS 

A symbolic parameter is a type of variable symbol that is assigned 
values by the programmer when he writes a macro-instruction. The 
programmer may vary statements that are generated for each occurrence of a 
macro-instruction by varying the values assigned to symbolic parameters. 

A symbolic parameter consists of an ampersand followed by from one 
through seven letters and/or digits, the first of which must be a letter. 
Elsewhere, two ampersands must be used to represent an ampersand. 



The programmer 
symbolic parameter. 



should not use &SYS as the first four characters of a 



The following are valid symbolic parameters: 

6.READER &L00P2 
&A23456 &N 
&X4F2 &$4 

The following are invalid symbolic parameters: 

CARDAREA (first character is not an ampersand) 
6i256B (first character after ampersand is not a letter) 

&AREA2456 (more than seven characters after the ampersand) 
&BCD%34 (contains a special character other than initial ampersand) 
&IN AREA (contains a special character, i.e., blank, other than 
initial ampersand) 



Any symbolic parameters in a model statement 
prototype statement of the macro-definition. 



must appear in the 



The following 
symbolic parameters 
statement. 



is an example of a macro-definition. Note that the 
in the model statements appear in the prototype 



Header 

Prototype 

Model 

Model 

Model 

Model 

Trailer 



Name 


Operation 
MACRO 


Operand 


& NAME 


MOVE 


&TO,&FROM 


& NAME 


ST 


2, SAVE 




L 


2,&FR0M 




ST 


2,&T0 




L 


2, SAVE 




MEND 






Symbolic parameters in model statements are replaced by the characters 
of the macro- instruction that correspond to the symbolic parameters. 
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In the following example the characters HERE, FIELDA, and FIELDS of 
the MOVE macro- instruct ion correspond to the symbolic parameters &NAME, 
&T0, and &FROM, respectively, of the MOVE prototype statement. 



Name 


Operation 


Operand 


HERE 


MOVE 


FIELDA, FIELDB 



Any occurrence of the symbolic parameters &NAME, &T0, and &FROM in a 
model statement will be replaced by the characters HERE, FIELDA, and 
FIELDB, respectively. If the preceding macro- instruction were used in a 
source program, the following assembler language statements would be 
generated: 



Name 


Operation 


Operand 


HERE 


ST 
L 
ST 
L 


2, SAVE 
2, FIELDB 
2, FIELDA 
2, SAVE 



The example below illustrates another use of the MOVE macro instruction 
using operands different from those in the preceding example. 



Macro 

Generated 
Generated 
Generated 
Generated 



Name 

LABEL 

LABEL 


Operation 


Operand 


MOVE 

ST 
L 
ST 
L 


IN, OUT 

2, SAVE 
2,0Lrr 
2, IN 
2, SAVE 



If a symbolic parameter appears in the comments field of a model 
statement, it is not replaced by the corresponding characters of the macro- 
instruction. 

Concatenating Symbolic Parameters with Other Characters or Other Symbolic 
Parameters 

If a symbolic parameter in a model statement is immediately preceded 
or followed by other characters or another symbolic parameter, the 
characters that correspond to the symbolic parameter are combined in the 
generated statement with the other characters or the characters that 
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correspond to the other symbolic parameter, 
concatenation. 



This process is called 



The macro-definition, macro-instruction, and generated statements in 
the following example illustrate these rules. 





Name 




Operation 


Operand 


Header 




MACRO 




Prototype 


&NAME 


MOVE 


&TY,&P,&TO,&FROM 


Model 


&NAME 


ST&TY 


2, SAVEAREA 


Model 




L&TY 


2 , &P&FROM 


Model 




ST&TY 


2,&P&T0 


Model 




L&TY 


2 , SAVEAREA 


Trailer 




MEND 




Macro 


HERE 


MOVE 


D, FIELD, A, B 


Generated 


HERE 


STD 


2 , SAVEAREA 


Generated 




LD 


2,FIELDB 


Generated 




STD 


2,FIELDA 


Generated 


J 


LD 2 , SAVEAREA 



The sjmibolic parameter &TY is used in each of the four model 
statements to vary the mnemonic operation code of each of the generated 
statements. The character D in the macro-instruction corresponds to 
symbolic parameter &TY. Since &TY is preceded by other characters (i.e., 
ST and L) in the model statements, the character that corresponds to &TY 
(i.e., D) is concatenated with the other characters to form the operation 
fields of the generated statements. 

The symbolic parameters &P, &T0, and &FROM are used in two of the 
model statements to vary part of the operand fields of the corresponding 
generated statements. The characters FIELD, A, and B correspond to the 
symbolic parameters &P, &T0, and &FROM, respectively. Since &P is followed 
by &FROM in the second model statement, the characters that correspond to 
them (i.e., FIELD and B) are concatenated to form part of the operand field 
of the second generated statement. Similarly, FIELD and A are concatenated 
to form part of the operand field of the third generated statement. 

If the programmer wishes to concatenate a sjnnbolic parameter with a 
letter, digit, left parenthesis, or period following the symbolic 
parameter, he must immediately follow the s3nnbolic parameter with a period, 
A period is optional if the symbolic parameter is to be concatenated with 
another symbolic parameter, or a special character other than a left 
parenthesis or another period that follows it. 

If a symbolic parameter is immediately followed by a period, then the 
symbolic parameter and the period are replaced by the characters that 
correspond to the symbolic parameter, A period that immediately follows a 
symbolic parameter does not appear in the generated statement. 
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The following macro definition, macro-instruction, and generated 
statements illustrate these rules. 





Name 


Operation Operand 


Header 




MACRO 




Prototype 


&NAME 


MOVE 


&P,&S,&R1,&R2 


Model 


&NAME 


ST 


&R1,£.S.(&R2) 


Model 




L 


&R1,&P.B 


Model 




ST 


&R1,&P.A 


Model 




L 


&R1,&S.(&R2) 


Trailer 




MEND 




Macro 


HERE 


MOVE 


FIELD, SAVE, 2, 4 


Generated 


HERE 


ST 


2, SAVE (4) 


Generated 




L 


2,FIELDB 


Generated 




ST 


2,FIELDA 


Generated 




L 


2, SAVE (4) 



The symbolic parameter &P is used in the second and third model 
statements to vary part of the operand field of each of the corresponding 
generated statements. The characters FIELD of the macro-instruction 
correspond to &P. Since &P is to be concatenated with a letter (i.e., B 
and A) in each of the statements, a period immediately follows &P in each 
of the model statements. The period does not appear in the generated 
statements. 

Similarly, symbolic parameter &S is used in the first and fourth model 
statements to vary the operand fields of the corresponding generated 
statements. &S is followed by a period in each of the model statements, 
because it is to be concatenated with a left parenthesis. The period does 
not appear in the generated statements. 

COMMENTS STATEMENTS 

A model statement may be a comments statement. A coiranents statement 
consists of an asterisk in the begin column, followed by comments. The 
comments statement is used by the assembler to generate an assembler 
language comments statement, just as other model statements are used by the 
assembler to generate assembler language statements. No variable symbol 
substitution is performed. 

The programmer may also write comments statements in a macro- 
definition which are not to be generated. These statements must have a 
period in the begin column, immediately followed by an asterisk and the 
comments. 
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The first statement in the following example will be used by the 
assembler to generate a comments statement; the second statement will not. 



Name 



I Operation I Operand 



* THIS STATEMENT WILL BE GENERATED 
.*THIS ONE WILL NOT BE GENERATED 



NOTE: To get a truly representative sampling of the various language 
components used effectively in writing macro - instructions the programmer 
may list all or selected macro-instructions from the SYSl.GENLIB or the 
SYSl.MACLIB by using the lEBPTPCH system utility covered in the "OS 
Utilities" manual. 

COPY STATEMENTS 

COPY statements may be used to copy model statements and MEXIT, MNOTE, 
and conditional assembly instructions into a macro-definition, just as they 
may be used outside macro-definitions to copy source statements into an 
assembler language program. 

The format of this statement is: 



Name 


Operation 


Operand 


Blank 


COPY 


A symbol 



The operand is a symbol that identifies a partitioned data set member 
to be copied from either the system macro library or a user library 
concatenated to it. The symbol must not be the same as the operation 
mnemonic of a definition in the macro library. Any statement that may be 
used in a macro-definition may be part of the copied coding, except MACRO, 
MEND, COPY, and prototype statements. 

When considering statement positions within a program the code 
included by a COPY instruction statement should be considered rather than 
the COPY itself. For example if a COPY statement in a macro-definition 
brings in global and local definition statements, it may appear immediately 
after the prototype statement. However, since global definition statements 
must come before local definition statements, if global and local defini- 
tion statements are also specified explicitly in the macro-definition which 
contains the COPY, the COPY must occur between the explicit global defini- 
tion statements and the explicit local definition statements. 
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SECTION 8: HOW TO WRITE MACRO-INSTRUCTIONS 



The format of a macro-instruction is: 



Name 


Operation 


Operand 


Any sym- 
bol or 
blank 


Mnemonic 

operation 

code 


0-200 operands, 
separated by 
commas • 



The name field of the macro- instruction may contain a symbol. The 
symbol will not be defined unless a symbolic parameter appears in the name 
field of the prototype and the same parameter appears in the name field of 
a generated model statement. 

The operation field contains the mnemonic operation code of the macro- 
instruction. The mnemonic operation code must be the same as the mnemonic 
operation code of a macro-definition in the source program or in the macro 
library. 

The macro-definition with the same mnemonic operation code is used by 
the assembler to process the macro-instruction. If a macro-definition in 
the source program and one in the macro library have the same mnemonic 
operation code, the macro-definition in the source program is used. 

The placement and order of the operands in the macro-instruction is 
determined by the placement and order of the symbolic parameters in the 
operand field of the prototype statement. 

MACRO-INSTRUCTION OPERANDS 

Any combination of up to 255 characters may be used as a macro- 
instruction operand provided that the following rules concerning 
apostrophes, parentheses, equal signs, ampersands, commas, and blanks are 
observed. 

Paired Apostrophes; An operand may contain one or more quoted strings. A 
quoted string is any sequence of characters that begins and ends with an 
apostrophe and contains an even number of apostrophes. 

The first quoted string starts with the first apostrophe in the 
operand. Subsequent quoted strings start with the first apostrophe after 
the apostrophe that ends the previous quoted string. 

A quoted string ends with the first even-numbered apostrophe that is 
not immediately followed by another apostrophe. 
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The first and last apostrophes of a quoted string are called paired 
apostrophes. The following example contains two quoted strings. The first 
and fourth and the fifth and sixth apostrophes are each paired apostrophes. 

'A"B'C'D' 

An apostrophe not within a quoted string, immediately followed by a 
letter, and immediately preceded by the letter L (when L is preceded by any 
special character other than an ampersand) , is not considered in 
determining paired apostrophes. For instance, in the following example, 
the apostrophe is not considered. 

L' SYMBOL 

'AL' SYMBOL' is an invalid operand. 

Paired Parentheses: There must be an equal number of left and right paren- 
theses. The nth left parenthesis must appear to the left of the nth right 
parenthesis. 

Paired parentheses are a left parenthesis and a following right 
parenthesis without any other parentheses intervening. If there is more 
than one pair, each additional pair is determined by removing any pairs 
already recognized and reapplying the above rule for paired parentheses. 
For instance, in the following example the first and fourth, the second and 
third, and the fifth and sixth parentheses are each paired parentheses. 

(A(B)C)D(E) 

A parenthesis that appears between paired apostrophes is not 
considered in determining paired parentheses . For instance , in the 
following example the middle parenthesis is not considered. 

Equal Signs; An equal sign can only occur as the first character in an 
operand or between paired apostrophes or paired parentheses. The following 
examples illustrate these rules. 

=F'32' 

'C=D' 

E(F=G) 

Ampersands: Except as noted under "Inner Macro - Instructions," each 
sequence of consecutive ampersands must be an even number of ampersands. 
The following example illustrates this rule. 

&£tl236t&&& 
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Coiamas : A comma indicates the end of an operand, unless it is placed 
between paired apostrophes or paired parentheses. The following example 
illustrates this rule. 

(A,B)C'/ 

Blanks ; Except as noted under "Statement Format," a blank indicates the 
end of the operand field, unless it is placed between paired apostrophes. 
The following example illustrates this rule. 

'A B C* 

The following are valid macro-instruction operands: 

SYMBOL A+2 

123 (TO (8), FROM) 

X'189A' 0(2,3) 

* =F'4096' 

L'NAME AB&&9 

'TEN = 10' 'PARENTHESIS IS )' 

'QUOTE IS"' 'COMMA IS ,' 

The following are invalid macro-instruction operands: 

W'NAME (odd number of apostrophes) 

5A)B (number of left parentheses does not equal ntunber of right 

parentheses) 
(15 B) (blank not placed between paired apostrophes) 
'ONE' IS '1' (blank not placed between paired apostrophes) 

STATEMENT FORMAT 

Macro-instructions may be written using the same alternate format that 
can be used to write prototype statements. If this format is used, a blank 
does not always indicate the end of the operand field. The alternate 
format is described in Section 7, under the subsection "Macro-Instruction 
Prototype." Unlike prototype statements, macro-instructions can have 
omitted operands, and they can have consecutive commas or a comma at the 
end of the operand list. 

OMITTED OPERANDS 

If an operand that appears in the prototype statement is omitted from 
the macro-instruction, then the comma that would have separated it from the 
next operand must be present. If the last operand (s) is omitted from a 
macro-instruction, then the comma(s) separating the last operand(s) from 
the next previous operand may be omitted. 

The following example shows a macro-instruction preceded by its 
corresponding prototype statement. The macro-instruction operands that 
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correspond to the third and sixth operands of the prototype statement are 
omitted in this example. 



Name 


Operation 


Operand 




EXAMPLE 
EXAMPLE 


&A,6.B,&C,&D,&E,&F 
17, *+4,, AREA, FIELD (6) 



If the symbolic parameter that corresponds to an omitted operand is 
used in a model statement, a null character value replaces the symbolic 
parameter in the generated statement, i.e. , in effect the symbolic 
parameter is removed. For example, the first statement below is a model 
statement that contains the symbolic parameter &C. If the operand that 
corresponds to &C was omitted from the macro instruction, the second 
statement below would be generated from the model statement. 



Name 


Operation 


Operand 




MVC 
MVC 


THERE&C.25,THIS 
THERE25,THIS 



OPERAND SUBLISTS 

A sublist may occur as the operand of a macro-instruction. 

Sublists provide the programmer with a convenient way to refer to a 
collection of macro-instruction operands as a single operand, or a single 
operand in a collection of operands. 

A sublist consists of one or more operands separated by commas and 
enclosed in paired parentheses. The entire sublist, including the 
parentheses, is considered to be one macro-instruction operand. 

If a macro- instruction is written in the alternate statement format, 
each operand of the sublist may be written on a separate line; the macro- 
instruction may be written on as many lines as necessary. 

If &P1 is a symbolic parameter in a prototype statement, and the 
corresponding operand of a macro-instruction is a sublist, then &Pl(n) may 
be used in a model statement to refer to the nth operand of the sublist, 
where n may have a value greater than or equal to 1. n may be specified as 
a decimal integer or any arithmetic expression allowed in a SETA 
instruction. (The SETA instruction is described in Section 9.) If the nth 
operand is omitted, then $Pl(n) would refer to a null character value. 
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If the sublist notation is used but the operand is not a sublist, then 
&P1(1) refers to the operand and &P1(2), &P1(3),... refer to a null 
character value. If an operand has the form ( ), it is treated 
character string and not as a sublist. 



as 



For example, consider the following 
instruction, and generated statements. 



macro - definition , macro- 





Name 


Operation 


Operand 


Header 




MACRO 




Prototype 




ADD 


&NUM,&REG,&AREA 


Model 




L 


&REG,&NUM(1) 


Model 




A 


&REG,&NUM(2) 


Model 




A 


&REG,&NUM(3) 


Model 




ST 


&REG,&AREA 


Trailer 




MEND 




Macro 




ADD 


(A,B,C),6,SUM 


Generated 




L 


6,A 


Generated 




A 


6,B 


Generated 




A 


6,0 


Generated 




ST 


6, SUM 



The operand of the macro-instruction that corresponds to symbolic 
parameter &NUM is a sublist. One of the operands in the sublist is 
referred to in the operand field of three of the model statements. For 
example, &NUM(1) refers to the first operand in the sublist corresponding 
to symbolic parameter &NUM. The first operand of the sublist is A. 
Therefore, A replaces &NUM(1) to form part of the generated statement. 

Note: When referring to an operand in a sublist, the left parenthesis of 
the sublist notation must immediately follow the last character of the 
symbolic parameter, e.g., &NUM(1) . A period should not be placed between 
the left parenthesis and the last character of the symbolic parameter. 

A period may be used between these two characters only when the 
programmer wants to concatenate the left parenthesis with the characters 
that the symbolic parameter represents. The following example shows what 
would be generated if a period appeared between the left parenthesis and 
the last character of the symbolic parameter in the first model statement 
of the above example. 
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Prototype 
Model 

Macro 

Generated 



Name 


Operation 


Operand 




ADD 
L 


&IilUM,&REG,&AREA 
&REG,&NUM. (1) 




ADD 


(A,B,C),6,SUM 




L 


6,(A,B,C)(1) 



The symbolic parameter &NUM is used in the operand field of the model 
statement. The characters (A,B,C) of the macro-instruction correspond to 
&NUM. Since &NUM is immediately followed by a period, &NUM and the period 
are replaced by (A,B,C). The period does not appear in the generated 
statement. The resulting generated statement is an invalid assembler 
language statement. 

INNER MACRO INSTRUCTIONS 

A macro-instruction may be used as a model statement in a macro- 
definition. Macro - instructions used as model statements are called inner 
macro instructions. 



A macro-instruction that is not used as a model statement is 
to as an outer macro-instruction. 



referred 



The rule for inner macro-instruction parameters is the same as that 
for outer macro- instructions. Any symbolic parameters used in an inner 
macro-instruction are replaced by the corresponding characters of the outer 
macro-instruction. An operand of an outer macro-instruction sublist cannot 
be passed as a sublist to an inner macro-instruction. 

The macro-definition corresponding to an inner macro-instruction is 
used to generate the statements that replace the inner macro-instruction. 



The ADD macro-instruction of the previous example is used as an 
macro- instruction in the following example. 



inner 



The inner macro- instruction contains two symbolic parameters, &S and 
&T. The characters (X,Y,Z) and J of the macro-instruction correspond to &S 
and &T, respectively. Therefore, these characters replace the symbolic 
parameters in the operand field of the inner macro-instruction. 

The assembler then uses the macro-definition that corresponds to the 
inner macro-instruction to generate statements to replace the inner macro- 
instruction. The fourth through seventh generated statements have been 
generated for the inner macro- instruction. 
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Name 


Operation 


Operand 


Header 




MACRO 




Prototype 




COMP 


&R1,&R2,&S,&T,&U 


Model 




SR 


&R1,&R2 


Model 




C 


&R1,&T 


Model 




BNE 


&U 


Inner 




ADD 


&S,12,&T 


Model 


&U 


A 


&R1,&T 


Trailer 




MEND 




Macro 


K 


COMP 


10,ll,(X,y,Z),J,K 


Generated 




SR 


10,11 


Generated 




C 


10, J 


Generated 




BNE 


K 


Generated 




L 


12, X 


Generated 




A 


12, Y 


Generated 




A 


12, Z 


Generated 




ST 


12, J 


Generated 


K 


A 10, J 



Further relevant limitations and differences between inner and outer 
macro-instructions will be covered under the pertinent sections on sequence 
symbols, attributes, etc. 

Note: An ampersand that is part of a symbolic parameter is not considered 
in determining whether a macro-instruction operand contains an even number 
of consecutive ampersands. 

LEVELS OF MACRO -INSTRUCTIONS 

A macro-definition that corresponds to an outer macro-instruction may 
contain any number of inner macro-instructions. The outer macro- 
instruction is called a first level macro- instruction. Each of the inner 
macro-instructions is called a second level macro-instruction. 

The macro-definition that corresponds to a second level macro- 
instruction may contain any number of inner macro-instructions. These 
macro-instructions are called third level macro instructions, etc. 

The number of levels of macro-instructions that may be used depends 
upon the complexity of the macro-definition and the amount of storage 
available. 
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SECTION 9; HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 



The conditional assembly instructions allow the programmer to: (1) 
define and assign values to SET symbols that can be used to vary parts of 
generated statements, and (2) vary the sequence of generated statements. 
Thus, the programmer can use these instructions to generate many different 
sequences of statements from the same macro-definition. 

There are 13 conditional assembly instructions, 10 of which are 
described in this section. The other three conditional assembly 
instructions — GBLA, GBLB, and GBLC — are described in Section 10. The 
instructions described in this section are: 

ANOP 



LCLA 


SETA 


AIF 


LCLB 


SETB 


AGO 


LCLC 


SETC 


ACTR 



The primary use of the conditional assembly instructions is in macro- 
definitions. However, all of them may be used in an assembler language 
source program. 

Where the use of an instruction outside macro^deflnitions differs from 
its use within macro-definitions, the difference is described in the 
subsequent text. 

The LCLA, LCLB, and LCLC instructions may be used to define and assign 
initial values to SET symbols. 

The SETA, SETB, and SETC instructions may be used to assign 
arithmetic, binary, and character values, respectively, to SET s3mibols. 
The SETB instruction is described after the SETA and SETC instructions, 
because the operand field of the SETB instruction is a combination of the 
operand fields of the SETA and SETC instructions. 

The AIF, AGO, and ANOP instructions may be used in conjunction with 
sequence symbols to vary the sequence in which statements are processed by 
the assembler. The programmer can test attributes assigned by the 
assembler to symbols or macro- instruction operands to determine which 
statements are to be processed. The ACTR instruction may be used to vary 
the maximum number of AIF and AGO branches. 

Examples illustrating the use of conditional assembly instruction are 
included throughout this section. A chart summarizing the elements that 
can be used in each instruction appears at the end of this section. 
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SET SYMBOLS 

SET symbols are one type of variable symbol. The symbolic parameters 
discussed in Section 7 are another type of variable symbol. SET symbols 
differ from symbolic parameters in three ways: (1) where they can be used 
in an assembler language source program, (2) how they are assigned values, 
and (3) whether or not the values assigned to them can be changed. 

Symbolic parameters can only be used in macro-definitions, whereas SET 
symbols can be used inside and outside macro-definitions. 

Sjrmbolic parameters are assigned values when the programmer writes a 
macro- instruction, whereas, SET symbols are assigned values when the 
programmer writes SETA, SETB, and SETC conditional assembly instructions. 

Each symbolic parameter is assigned a single value for one use of a 
macro -definition, whereas the values assigned to each SETA, SETB, and SETC 
symbol can change during one use of a macro-definition. 

Defining SET Symbols 

SET symbols must be defined by the programmer before they are used. 
When a SET symbol is defined it is assigned an initial value. SET symbols 
may be assigned new values by means of the SETA, SETB, and SETC 
instructions. A SET symbol is defined when it appears in the operand field 
of an LCLA, LCLB, or LCLC instruction. 

Using Variable Symbols 

The SETA, SETB, and SETC instructions may be used to change the values 
assigned to SETA, SETB, and SETC symbols, respectively. When a SET symbol 
appears In the name, operation, or operand field of a model statement, the 
current value of the SET symbol (i.e., the last value assigned to it) 
replaces the SET symbol in the statement. 

For example, if &A is a symbolic parameter, and the corresponding 
characters of the macro-instruction are the symbol HERE, then HERE replaces 
each occurrence of &A in the macro-definition. However, if &A is a SET 
symbol, the value assigned to &A can be changed, and a different value can 
replace each occurrence of &A in the macro-definition. 

The same variable symbol may not be used as a symbolic parameter and 
as a SET symbol in the same macro-definition. 

The following illustrates this rule. 
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Name 


Operation 


Operand 


&NAME 


MOVE 


&TO,&FROM 



If the statement above is a prototype statement, then &NAME, &T0, 
6tFR0M may not be used as SET symbols in the macro-definition. 



and 



The same variable symbol may not be used as two different types of SET 
symbols in the same macro-definition. Similarly, the same variable sjnnbol 
may not be used as two different types of SET symbols outside 
definitions. 



macro- 



For example, if &A is a SETA symbol in a macro-definition, it cannot 
be used as a SETC symbol in that definition. Similarly, if &A is a SETA 
symbol outside macro-definitions, it cannot be used as a SETC symbol 
outside macro-definitions. 

The same variable symbol may be used in two or more macro-definitions 
and outside macro-definitions. If such is the case, the variable symbol 
will be considered a different variable S3anbol each time it is used. 

For example, if &A is a variable symbol (either SET symbol or symbolic 
parameter) in one macro-definition, it can be used as a variable symbol 
(either SET symbol or symbolic parameter) in another definition. Similarly, 
if &A is a variable symbol (SET symbol or symbolic parameter) in a macro- 
definition, it can be used as a SET symbol outside macro-definitions. 

All variable symbols may be concatenated with other characters in the 
same way that symbolic parameters may be concatenated with other 
characters. The rules for concatenating symbolic parameters with other 
characters are in Section 7 under the subsection "Symbolic Parameters.'* 

Variable symbols in macro-instructions are replaced by the values 
assigned to them, immediately prior to the start of processing the 
definition. If a SET symbol is used in the operand field of a macro- 
instruction, and the value assigned to the SET symbol is equivalent to the 
sublist notation, the operand is not considered a sublist. 

ATTRIBUTES 

The assembler assigns attributes to macro-instruction operands and to 
symbols in the program. These attributes may be referred to only in 
conditional assembly instructions or expressions. 

There are six kinds of attributes. They are: type, length, scaling, 
integer, count, and number. Each kind of attribute is discussed in the 
paragraphs that follow. 
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If an outer macro-instruction operand is a symbol before substitution, 
then the attributes of the operand are the same as the corresponding 
attributes of the symbol. The symbol must appear in the name field of an 
assembler language statement or in the operand field of an EXTRN statement 
in the program. The statement must be outside macro-definitions and must 
not contain any variable symbols. 

If an inner macro-instruction operand is a symbolic parameter, then 
the attributes of the operand are the same as the attributes of the 
corresponding outer macro-instruction operand. A symbol appearing as an 
inner macro-instruction operand is not assigned the same attributes as the 
same symbol appearing as an outer macro-instruction operand. 

If a macro-instruction operand is a sublist, the programmer may refer 
to the attributes of either the sublist or each operand in the sublist. 
The type, length, scaling, and integer attributes of a sublist are the same 
as the corresponding attributes of the first operand in the sublist. 

All the attributes of macro-instruction operands may be referred to in 
conditional assembly instructions within macro-definitions. However, only 
the type, length, scaling, and integer attributes of symbols may be 
referred to in conditional assembly instructions outside macro-definitions. 
Symbols appearing in the name field of generated statements are not 
assigned attributes. 

Each attribute has a notation associated with it. The notations are: 



Attribute 


Notation 


Type 


T' 


Length 


L' 


Scaling 


S' 


Integer 


I' 


Count 


K' 


Number 


N' 



The programmer may refer to an attribute in the following ways: 

1. In a statement that is outside macro-definitions, he may write 
the notation for the attribute immediately followed by a symbol, 
(e.g., T'NAME refers to the type attribute of the symbol NAME.) 

2. In a statement that is in a macro-definition, he may write the 
notation for the attribute immediately followed by a symbolic 
parameter. (e.g., L'&NAME refers to the length attribute of the 
characters in the macro-instruction that correspond to symbolic 
parameter &NAME; L'&NAME(2) refers to the length attribute of the 
second operand in the sublist that corresponds to symbolic 
parameter &NAME.) 
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Type Attribute (T') 

The type attribute of a macro-instruction operand, or a symbol is a 
letter. 

The following letters are used for symbols that name DC and DS 
statements and for outer macro-instruction operands that are S3niibols that 
name DC or DS statements. 

A A-type address constant, implied length, aligned, (also in CXD statement) 

B Binary constant. 

C Character constant. 

D Long floating-point constant, implied length, aligned. 

E Short floating-point constant, implied length, aligned. 

F Full-word fixed-point constant, implied length, aligned. 

G Fixed-point constant, explicit length. 

H Half-word fixed -point constant, implied length, aligned. 

K Floating-point constant, explicit length. 

L Extended floating-point constant, implied length, aligned. 

P Packed decimal constant. 

Q Q-type address constant, implied length, aligned. 

R A-, S-, Q-, V-, or Y-type address constant, explicit length. 

S S-type address constant, implied length, aligned. 

V V-type address constant, implied length, aligned. 
X Hexadecimal constant. 

Y Y-type address constant, implied length, aligned. 
Z Zoned decimal constant. 

The following letters are used for symbols (and outer macro- 
instruction operands that are symbols) that name statements other than DC 
or DS statements, or that appear in the operand field of an EXTRN 
statement. 

I Machine instruction 

J Control section name 

M Macro-instruction 

T EXTRN symbol 

W CCW instruction 

$ WXTRN symbol 

The following letters are used for inner and outer macro-instruction 
operands only. 

N Self-defining term 
Omitted operand 

The following letter is used for inner and outer macro-instruction 
operands that cannot be assigned any of the above letters. This includes 
inner macro- instruction operands that are symbols. This letter is also 
assigned to symbols that name EQU and LTORG statements, to any symbols 
occurring more than once in the name field of source statements, and to all 
symbols naming statements with expressions as modifiers. 
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u 



Undefined 



The attributes of A, B, C and D are undefined in the following 
example : 



Name 


Operation 


Operand 


A 
B 
C 
D 


DC 
DC 
DC 
DC 


3FL(AA-BB)'75' 
(AA-BB)F'15' 
&X'l' 
FL(3-2)'l' 



The programmer may refer to a type attribute in the operand field of 
a SETC instruction, or in character relations in the operand fields of SETB 
or AIF instructions. 

Length (L'), Scaling (S^). and Integer (I') Attributes 

The length, scaling, and integer attributes of macro-instruction 
operands, and symbols are numeric values. 

The length attribute of a symbol (or of a macro-instruction operand 
that is a symbol) is as described in Part I of this publication. The use 
of the length attribute of a symbol defined with a DC or DS with explicit 
length given by an expression is invalid. Reference to the length 
attribute of a variable symbol is illegal except for symbolic parameters in 
SETA, SETB and AIF statements. If the basic L' attribute is desired, it 
may be obtained as follows: 



&A 


SETC 


'Z' 


&B 


SETC 


'L'" 




MVC 


&A.(&B&A),X 



After generation, this would result in 

MVC Z(L'Z),X 

Conditional assembly instructions must not refer to the length 
attributes of symbols or macro-instruction operands whose type attributes 
are the letters M, N, 0, T, U, W, or $. 

Scaling and integer attributes are provided for symbols that name 
fixed-point, floating-point, and decimal fields. 

Fixed- and Floating-Point: The scaling attribute of a fixed-point or 
floating-point number is the value given by the scale modifier. The integer 
attribute is a function of the scale and length attributes of the number. 
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Decimal: The scaling attribute of a decimal nximber is the number of 
decimal digits to the right of the decimal point. The integer attribute of 
a decimal number is the number of decimal digits to the left of the assumed 
decimal point after the number is assembled. 

Scaling and integer attributes are available for .symbpls and macro- 
instruction operands only if their type attributes are H, F, and G (fixed- 
point) ; D, E, L, and K (floating point); or P and Z (decimal). 

The programmer may refer to the length, scaling, and integer 
attributes in the operand field of a SETA instruction, or in arithmetic 
relations in the operand fields of SETB or AIF instructions. 

Count Attribute (K') 

The programmer may refer to the count attribute of macro-instruction 
operands only. 

The value of the count attribute is equal to the number of characters 
in the macro- instruction operand. It includes all characters in the 
operand, but does not include the delimiting commas. The count attribute 
of an omitted operand is zero. These rules are illustrated by the 
following examples: 

Operand Count Attribute 



ALPHA 


5 


(JUNE, JULY, AUGUST) 


18 


2(10,12) 


8 


A(2) 


4 


'A"B' 


6 


I t 


3 


1 1 


2 



If a macro- instruction operand contains variable s3rmbols, the 
characters that replace the variable symbols, rather than the variable 
symbols, are used to determine the count attribute. 

The programmer may refer to the count attribute in the operand field 
of a SETA instruction, or in arithemetic relations in the operand fields of 
SETB and AIF instructions that are part of a macro-definition. 

Number Attribute (N') 

The programmer may refer to the number attribute of macro-instruction 
operands only. 

The number attribute is a value equal to the number of operands in an 
operand sublist. The number of operands in an operand sublist is equal to 
one plus the number of commas that indicate the end of an operand in the 
sublist. 
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The following examples illustrate this rule. 



(A,B,C,D,E) 

(A,,C,D,E) 

(A,B,C,D) 

(,B,C,D,E) 

(A,B,C,D,) 

(A,B,C,D,,) 



operands 
operands 
operands 
operands 
operands 
operands 



If the macro-instruction operand is not a sublist, the number 
attribute is one. If the macro- instruction operand is omitted, the number 
attribute is zero. 

The programmer may refer to the number attribute in the operand field 
of a SETA instruction, or in arithmetic relations in the operand fields of 
SETB and AIF instructions that are part of a macro-definition. 

Assigning Attributes to Symbols 

The integer attribute is computed from the length and scaling 
attributes. 

Fixed Point: The integer attribute of a fixed-point number is equal to 
eight times the length attribute of the number minus the scaling attribute 
minus one; i.e., I'=8*L'-S'-1. 

Each of the following statements defines a fixed-point field. The 
length attribute of HALFCON is 2, the scaling attribute is 6, and the 
integer attribute is 9. The length attribute of ONECON is 4, the scaling 
attribute is 8, and the integer attribute is 23. 



Name 


Operation 


Operand 


HALFCON 
ONECON 


DC 
DC 


HS6'-25.93' 
FS8'100.3E-2' 



Floating Point: The integer attribute of a Type D or E floating-point 
number is equal to two times the difference between the length attribute of 
the number and one, minus the scaling attribute; i.e., I'=2* (L'-l)-S'. 

Because of its low order characteristic, the integer attribute of a 
Type L constant with a length greater than 8 bytes is two less than the 
value indicated in the formula above. The integer attribute of a Type L 
constant with a length of 8 bytes or less is the same as the value 
indicated in the formula above. 

Each of the following statements defines a floating-point field. The 
length attribute of SHORT is 4, the scaling attribute is 2, and the integer 
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attribute is 4. The length attribute of LONG is 8, the 
is 5, and the integer attribute is 9. 



scaling attribute 



Name 


Operation 


Operand 


SHORT 
LONG 


DC 
DC 


ES2'A6.415' 
DS5'-3.729' 



Decimal; The integer attribute of a packed decimal number is equal to two 
times the length attribute of the number minus the scaling attribute minus 
one; i.e., I'=2*L'-S'-1. The integer attribute of a zoned decimal number 
is equal to the difference between the length attribute and the scaling 
attribute; i.e., I'=L*-S*. 

Each of the following statements defines a decimal field. The length 
attribute of FIRST is 2, the scaling attribute is 2, and the integer 
attribute is 1. The length attribute of SECOND is 3, the scaling attribute 
is 0, and the integer attribute is 3. The length attribute of THIRD is 4, 
the scaling attribute is 2, and the integer attribute is 2. The length 
attribute of FOURTH is 3, the scaling attribute is 2, and the integer 
attribute is 3. 



Name 


Operation 


Operand 


FIRST 
SECOND 
THIRD 
FOURTH 


DC 
DC 
DC 
DC 


P'+1.25' 
Z'-543' 
Z'79.68' 
p'79.68' 



SEQUENCE SYMBOLS 

The name field of a statement may contain a sequence symbol. Sequence 
symbols provide the programmer with the ability to vary the sequence in 
which statements are processed by the assembler. 

A sequence symbol is used in the operand field of an AIF or AGO 
statement to refer to the statement named by the sequence symbol. 

A sequence symbol is considered to be local to a macro-definition. 

A sequence symbol may be used in the name field of any statement that 
does not contain a symbol or SET symbol except a prototype statement, a 
MACRO, LCLA, LCLB, LCLC, GBLA, GBLB, GBLC, ACTR, ICTL, ISEQ, or COPY 
instruction. 
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A sequence symbol consists of a period followed by one through seven 
letters and/or digits, the first of which must be a letter. 

The following are valid sequence symbols: 



.READER 


.A23456 


.L00P2 


.X4F2 


.N 


.S4 



The following are invalid sequence symbols : 

CARDAREA (first chracter is not a period) 
•246B (first character after period is not a letter) 
•AREA2456 (more than seven characters after period) 
.BCD%84 (contains a special character other than initial period) 
.IN AREA (contains a special character, i.e., blank, other than initial 
period) 

If a sequence symbol appears in the name field of a macro-instruction, 
and the corresponding prototytpe statement contains a symbolic parameter in 
the name field, the sequence symbol does not replace the symbolic parameter 
wherever it is used in the macro-definition. 

The following example illustrates this rule. 



1 
2 



3 
4 



Name 


Operation 


Operand 


&NAME. 
&NAME 


MACRO 
MOVE 

ST 

L 

ST 

L 

MEND 


&TO,&FROM 

2, SAVEAREA 

2 , &FROM 

2,&T0 

2 , SAVEAREA 


.SYM 


MOVE 


FIELDA.FIELDB 




ST 

L 

ST 

L 


2, SAVEAREA 
2,FIELDB 
2,FIELDA 
2 , SAVEAREA 



The symbolic parameter &NAME is used in the name field of the 
prototype statement (statement 1) and the first model statement (statement 
2). In the macro - instruction (statement 3) a sequence symbol (.SYM) 
corresponds to the symbolic parameter &NAME. &NAME is not replaced by 
.SYM, and, therefore, the generated statement (statement 4) does not 
contain an entry in the name field. 
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LCLA, LCLB, LCLC — DEFINE LOCAL SET SYMBOLS 
The format of these instructions is: 



Name 


Operation 


Operand 


Blank 


LCLA, 


One or more variable 




LCLB, or 


symbols, that are 




LCLC 


to be used as SET 
symbols, separated 
by commas 



The LCLA, LCLB, and LCLC instructions are used to define and assign 
initial values to SETA, SETB, and SETC symbols, respectively. The SETA, 
SETB, and SETC symbols are assigned the initial values of 0, 0, and null 
character value, respectively. 

The programmer should not define any SET symbol whose first four 
characters are &SYS. 

All LCLA, LCLB, or LCLC instructions in a macro-definition must appear 
immediately after the prototype statement and GBLA, GBLB or GBLC 
instructions. All LCLA, LCLB, or LCLC instructions outside macro- 
definitions must appear after all macro-definitions in the source program, 
after all GBLA, GBLB, AND GBLC instructions outside macro-definitions, 
before all conditional assembly instructions, and PUNCH and REPRO 
statements outside macro-definitions, and before the first control section 
of the program. 

SETA — SET ARITHMETIC 



The SETA instruction may be used to assign an arithmetic value 
SETA symbol. The format of this instruction is: 



to 



Name 


Operation 


Operand 


A SETA 
symbol 


SETA 


An arithmetic 
expression 



The expression in the operand field is evaluated as a signed 32-bit 
arithmetic value which is assigned to the SETA symbol in the name field. 
The minimum and maximum allowable values of the expression are -2^^ and 
•+2^^-l, respectively. 

The expression may consist of one term or an arithmetic combination of 
terms. The terms that may be used alone or in combination with each other 
are self-defining terms, variable symbols, and the length, scaling, 
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integer, count, and number attributes. Self-defining terms are described 
in Part I of this publication. 

Note: A SETC variable symbol may appear in a SETA expression only if the 
value of the SETC variable is one to eight decimal digits. The decimal 
digits will be converted to a positive arithmetic value. 

The arithmetic operators that may be used to combine the terms of an 
expression are + (addition) , - (subtraction) , * (multiplication) , and 7 
(division) . 

An expression may not contain two terms or two operators in 
succession, nor may it begin with an operator. 

The following are valid operand fields of SETA instructions: 

&AREA+X'2D' I'&N/25 
&BETA*10 &EXIT-S ' 6tENTRY+l 
L'&HERE+32 29 

The following are invalid operand fields of SETA instructions: 

&AREAX'C' (two terms in succession) 

&FIELD+- (two operators in succession) 

-&DELTA*2 (begins with an operator) 

*+32 (begins with an operator; two operators in succession) 

NAME/15 (NAME is not a valid term) 

Evaluation of Arithmetic Expressions 

The procedure used to evaluate the arithmetic expression in the 
operand field of a SETA instruction is the same as that used to evaluate 
arithmetic expressions in assembler language statements. The only 
difference between the two types of arithmetic expressions is the terms 
that are allowed in each expression. 

The following evaluation procedure is used: 

1. Each term is given its numerical value. 

2. The arithmetic operations are performed moving from left to right. 
However, multiplication and/or division are performed before addition 
and subtraction. 

3. The computed result is the value assigned to the SETA symbol in the 
name field. 

The arithmetic expression in the operand field of a SETA instruction 
may contain one or more sequences of arithmetically combined terms that are 
enclosed in parentheses. A sequence of parenthesized terms may appear 
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within another parenthesized sequence. Only five levels of parentheses are 
allowed and an expression may not consist of more than 16 terms • 
Parentheses required for sublist notation, substring notation, and 
subscript notation count toward this limit. 

The following are examples of SETA instruction operand fields that 
contain parenthesized sequences of terms. 

(L'&HERE+32)*29 

&AREA+X' 2D ' / (&EXIT-S ' &ENTRY+1) 

&BETA*10* (I * &N/25/ (&EXIT-S ' &ENTRY+1) ) 

The parenthesized portion or portions of an arithmetic expression are 
evaluated before the rest of the terms in the expression are evaluated. If 
a sequence of parenthesized terms appears within another parenthesized 
sequence, the innermost sequence is evaluated first. 

Using SETA Symbols 

The arithmetic value assigned to a SETA S3anbol is substituted for the 
SETA symbol when it is used in an arithmetic expression. If the SETA 
symbol is not used in an arithmetic expression, the arithmetic value is 
converted to an unsigned integer, with leading zeros removed. If the value 
is zero, it is converted to a single zero. 

The following example illustrates this rule: 



1 
2 
3 
4 

5 
6 



Name 


Operation 


Operand 




MACRO 




&NAME 


MOVE 


&TO,&FROM 




LCLA 


&A,&B,&C,&D 


&A 


SETA 


10 


&B 


SETA 


12 


&C 


SETA 


&A-&B 


&D 


SETA 


&A+&C 


&NAME 


ST 


2,SAVEAREA 




L 


2,&FR0M&C 




ST 


2,&T0&D 




L 


2,SAVEAREA 




MEND 




HERE 


MOVE 


FIELDA, FIELDS 


HERE 


ST 


2,SAVEAREA 




L 


2,FIELDB2 




ST 


2,FIELDA8 




L 


2,SAVEAREA 
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Statements 1 and 2 assign to the SETA symbols &A and &B the arithmetic 
values +10 and +12, respectively. Therefore, statement 3 assigns the SETA 
symbol &C the arithmetic value -2. When &C is used in Statement 5, the 
arithmetic value -2 is converted to the unsigned integer 2. When &C is 
used in statement 4, however, the arithmetic value -2 is used. Therefore, 
&D is assigned the arithmetic value +8. When &D is used in statement 6, 
the arithmetic value +8 is converted to the unsigned integer 8. 



The following example shows how the value assigned to 
may be changed in a macro-definition. 



a SETA symbol 



2 
3 
4 



Name 


Operation 


Operand 


&NAME 

&A 
&NAME 

&A 


MACRO 

MOVE 

LCLA 

SETA 

ST 

L 

SETA 

ST 

L 

MEND 


&TO,&FROM 

&A 

5 

2 , SAVEAREA 

2,&FR0M&A 

8 

2,&T0&A 

2, SAVEAREA 


HERE 


MOVE 


FIELDA, FIELDS 


HERE 


ST 
L 

ST 
L 


2 , SAVEAREA 
2,FIELDB5 
2,FIELDA8 
2 , SAVEAREA 



Statement 1 assigns the arithmetic value +5 to SETA symbol &A. In 
statement 2, &A is converted to the unsigned integer 5. Statement 3 
assigns the arithmetic value +8 to &A. In statement 4, therefore, &A is 
converted to the unsigned integer 8, instead of 5. 

A SETA symbol may be used with a symbolic parameter to refer to an 
operand in an operand sublist. If a SETA symbol is used for this purpose 
it must have been assigned a positive value. 



a SETA 



Any expression that may be used in the operand field of 
instruction may be used to refer to an operand in an operand sublist 

Sublist s are described in Section 8 under "Operand Sublists." 

The following macro-definition may be used to add the last operand in 
an operand sublist to the first operand in an operand sublist and store the 
result at the first operand. A sample macro-instruction and generated 
statements follow the macro-definition. 
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1 

2 
3 



Name 


Operation 


Operand 


&LAST 


MACRO 

ADDX 

LCLA 

SETA 

L 

A 

ST 

MEND 


&NUMBER, &REG 

&LAST 

N'&NUMBER 

&REG,&NUMBER(1) 

&REG, &NUMBER(&LAST) 

&REG,&NUMBER(1) 




ADDX 


(A,B,C,D,E),3 




L 
A 
ST 


3, A 
3,E 
3,A 



&NUMBER is the first symbolic parameter in the operand field of the 
prototype statement (statement 1). The corresponding characters, 
(A,B,C,D,E), of the macro-instruction (statement 4) are a sublist. 
Statement 2 assigns to &LAST the arithmetic value +5, which is equal to the 
number of operands in the sublist. Therefore, in statement 3, 
&NUMBER(&LAST) is replaced by the fifth operand of the sublist. 

SETC — SET CHARACTER 

The SETC instruction is used to assign a character value to a SETC 
symbol. The format of this instruction is: 



Name 


Operation 


Operand 


A SETC 
symbol 


SETC 


ONE operand, of 
the form described 
below 



The operand field may consist of the type attribute, a character 
expression, a substring notation, or a concatenation of substring notations 
and character expressions. A SETA symbol may appear in the operand of a 
SETC statement. The result is the character representation of the decimal 
value, unsigned, with leading zeros removed. If the value is zero, one 
decimal zero is used. 
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Type Attribute 

The character value assigned to a SETC symbol may be a type attribute. 
If the type attribute is used, it must appear alone in the operand field. 
The following example assigns to the SETC symbol &TYPE the letter that is 
the type attribute of the macro-instruction operand that corresponds to the 
symbolic parameter &ABC. 



Name 


Operation 


Operand 


&TYPE 


SETC 


T'&ABC 



Character Expression 

A character expression consists of any combination of (up to 255) 
characters enclosed in apostrophes. 

The first eight characters in a character value enclosed in 
apostrophes in the operand field are assigned to the SETC symbol in the 
name field. The maximum size character value that can be assigned to a 
SETC symbol is eight characters. 

Evaluation of Character Expressions: The following statement assigns the 
character value AB%4 to the SETC symbol &ALPHA: 



Name 


Operation 


Operand 

'AB%4' 


&ALPHA 


SETC 



More than one character expression may be concatenated into a single 
character expression by placing a period between the terminating apostrophe 
of one character expression and the opening apostrophe of the next 
character expression. For example, either of the following statements may 
be used to assign the character value ABCDEF to the SETC symbol &BETA. 



Name 


Operation 


Operand 


&BETA 
&BETA 


SETC 
SETC 


'ABCDEF' 
'ABC'.'DEF' 



Two apostrophes must be used to represent an apostrophe that is part 
of a character expression. 
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The following statement assigns the character value L' SYMBOL to the 
SETC symbol &LENGTH. 



Name 


Operation 


&LENGTH 


SETC 



Operand 



'L" SYMBOL' 



Variable symbols may be concatenated with other characters in the 
operand field of a SETC instruction according to the general rules for 
concatenating symbolic parameters with other characters (see Section 7). 

If &ALPHA has been assigned the character value AB%4, the following 
statement may be used to assign the character value AB%4RST to the variable 
symbol &GAMMA. 



Name 


Operation 


Operand 


&GAMMA 


SETC 


•&AT,PHA.RST' 



Two ampersands must be used to represent an ampersand that is not part 
of a variable symbol. Both ampersands become part of the character value 
assigned to the SETC S3nnbol. They are not replaced by a single ampersand. 

The following statement assigns the character value HALF&& to the SETC 
sjnnbol &AND, 



Name 


Operation 


Operand 


&AND 


SETC 


•HALF&&' 



Substring Notation 

The character value assigned to a SETC symbol may be a substring 
character value. Substring character values permit the programmer to 
assign part of a character value to a SETC symbol. 

If the programmer wants to assign part of a character value to a SETC 
s)nnbol, he must indicate to the assembler in the operand field of a SETC 
instruction: (1) the character value itself, and (2) the part of the 
character value he wants to assign to the SETC symbol. The combination of 
(1) and (2) in the operand field of a SETC instruction is called a 
substring notation. The character value that is assigned to the SETC 
symbol in the name field is called a substring character value. 
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Substring notation consists of a character expression, immediately 
followed by two arithmetic expressions that are separated from each other 
by a comma and are enclosed in parentheses. Each arithmetic expression may 
be any expression that is allowed in the operand field of a SETA 
instruction. 

The first expression indicates the first character in the character 
expression that is to be assigned to the SETC symbol in the name field. 
The second expression indicates the number of consecutive characters in the 
character expression (starting with the character indicated by the first 
expression) that are to be assigned to the SETC symbol. If a substring 
asks for more characters than are in the character string only the 
characters in the string will be assigned. 

The maximum size substring character value that can be assigned to a 
SETC symbol is eight characters. The maximum size character expression the 
substring character value can be chosen for is 255 characters. If a value 
greater than 8 is specified, the leftmost 8 characters will be used. 

The following are valid substring notations: 

'&ALPHA'(2,5) 
'AB%4' (&AREA+2,1) 
*&ALPHA.RST'(6,&A) 
'ABC&GAMMA' (&A,&AREA+2) 

The following are invalid substring notations: 

'&BETA' (4,6) 

(blanks between character value and arithmetic expressions) 
' L " SYMBOL ' (142-&XYZ) 

(only one arithmetic expression) 
'AB%4&ALPHA* (8 &FIELD*2) 

(arithmetic expressions not separated by a comma) 
'BETA' 4, 6 

(arithmetic expressions not enclosed in parentheses) 

Using SETC Symbols 

The character value assigned to a SETC symbol is substituted for the 
SETC symbol when it is used in the name, operation, or operand field of a 
statement. 

For example, consider the following macro-definition, macro- 
instruction, and generated statements. 
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2 
3 



Name 


Operation 


Operand 


&NAME 

&PREFIX 
&NAME 


MACRO 

MOVE 

LCLC 

SETC 

ST 

L 

ST 

L 

MEND 


&TO,&FROM 

&PREFIX 

'FIELD' 

2, SAVEAREA 

2,&PREFIX&FR0M 

2,&PREFIX&T0 

2, SAVEAREA 


HERE 


MOVE 


A,B 


HERE 


ST 
L 
ST 
L 


2, SAVEAREA 
2,FIELDB 
2,FIELDA 
2, SAVEAREA 



Statement 1 assigns the character value FIELD to the SETC symbol 
&PREFIX. In statements 2 and 3, &PREFIX is replaced by FIELD. 

The following example shows how the value assigned to a SETC symbol 
may be changed in a macro-definition. 



2 
3 
4 



Name 


Operation 


Operand 




MACRO 




&NAME 


MOVE 


&TO,&FROM 




LCLC 


&PREFIX 


&PREFIX 


SETC 


•field' 


&NAME 


ST 


2, SAVEAREA 




L 


2,&PREFIX&FR0M 


&PREFIX 


SETC 


•area' 




ST 


2,&PREFIX&T0 




L 


2, SAVEAREA 




MEND 




HERE 


MOVE 


A,B 


HERE 


ST 


2, SAVEAREA 




L 


2,FIELDB 




ST 


2,AREAA 




L 


2, SAVEAREA 
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Statement 1 assigns the character value FIELD to the SETC symbol 
&PREFIX. Therefore, &PREFIX is replaced by FIELD in statement 2. 
Statement 3 assigns the character value AREA to &PREFIX. Therefore, 
&PREFIX is replaced by AREA, instead of FIELD, in statement 4. 

The following example illustrates the use of a substring notation as 
the operand field of a SETC instruction. 



1 
2 



Name 


Operation 


Operand 




MACRO 




&NAME 


MOVE 


&TO,&FROM 




LCLC 


&PREFIX 


&PREFIX 


SETC 


'&T0'(1,5) 


&NAME 


ST 


2,SAVEAREA 




L 


2,&PREFIX&FR0M 




ST 


2,&T0 




L 


2,SAVEAREA 




MEND 




HERE 


MOVE 


FIELDA.B 


HERE 


ST 


2,SAVEAREA 




L 


2, FIELDS 




ST 


2,FIELDA 




L 


2,SAVEAREA 



Statement 1 assigns the substring character value FIELD (the first 
five characters corresponding to symbolic parameter &T0) to the SETC S3^bol 
&PREFIX. Therefore, FIELD replaces &PREFIX in statement 2. 



An operand of a SETC symbol cannot be passed as a sublist to a 



Note: 

macro- instruct ion. 



Concatentating Substring Notations and Character Expressions: Substring 
notations may be concatenated with character expressions in the operand 
field of a SETC instruction. If a substring notation follows a character 
expression, the two may be concatenated by placing a period between the 
terminating apostrophe of the character expression and the opening 
apostrophe of the substring notation. 

For example, if &ALPHA has been assigned the character value AB%4, and 
&BETA has been assigned the character value ABCDEF, then the following 
statement assigns &GAMMA the character value AB%4BCD. 
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Name 


Operation 


Operand 


&GAMMA 


SETC 


'ALPHA'.'&BEtA'(2,3) 



If a substring notation precedes a character expression or another 
substring notation, the two may be concatenated by writing the opening 
apostrophe of the second item immediately after the closing parenthesis of 
the substring notation. 

The programmer may optionally place a period between the closing 
parenthesis of a substring notation and the opening apostrophe of the next 
item in the operand field. 

If &ALPHA has been assigned the character value AB%4, and &ABC has 
been assigned the character value 5RS, either of the following statements 
may be used to assign &WORD the character value AB%45RS. 



Name 


Operation 


Operand 


&WORD 
&WORD 


SETC 
SETC 


•&ALPHA'(1,4)'&ABC' 
'&ALPHA'(1,4)'&ABC'(1,3) 



If a SETC symbol is used in the operand field of a SETA instruction, 
the character value assigned to the SETC symbol must be one to eight 
decimal digits. 

If a SETA symbol is used in the operand field of a SETC statement, the 
arithmetic value is converted to an unsigned integer with leading zeros 
removed. If the value is zero, it is converted to a single zero. 

SETB — SET BINARY 

The SETB instruction may be used to assign the binary value or 1 to 
a SETB symbol. The format of this instruction is: 



Name 


Operation 


Operand 


A SETB 
symbol 


SETB 


A or a 1 enclosed or 
not enclosed in paren- 
theses, or a logical 
expression enclosed 
in parentheses 
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The operand field may contain a or a 1 or a logical expression 
enclosed in parentheses. A logical expression is evaluated to determine if 
it is true or false; the SETS symbol in the name field is then assigned the 
binary value 1 or corresponding to true or false, respectively. 

A logical expression consists of one term or a logical combination of 
terms. The terms that may be used alone or in combination with each other 
are arithmetic relations, character relations, and SETB symbols. The 
logical operators used to combine the terms of an expression are AND, OR, 
and NOT. 

An expression may not contain two terms in succession. A logical 
expression may contain two operators in succession only if the first 
operator is either AND or OR and the second operator is NOT. A logical 
expression may begin with the operator NOT. It may not begin with the 
operators AND or OR. 

An arithmetic relation consists of two arithmetic expressions 
connected by a relational operator. A character relation consists of two 
character values connected by a relational operator. The relational 
operators are EQ (equal), NE (not equal), LT (less than), GT (greater 
than) , LE (less than or equal) , and GE (greater than or equal) . 

Any expression that may be used in the operand field of a SETA 
instruction, may be used as an arithmetic expression in the operand field 
of a SETB instruction. Anything that may be used in the operand field of 
a SETC instruction may be used as a character value in the operand field of 
a SETB instruction. This includes substring and type attribute notations. 
The maximum size of the character values that can be compared is 255 
characters. If the two character values are of unequal size, then the 
smaller one will always compare less than the larger one. 

The relational and logical operators must be immediately preceded and 
followed by at least one blank or other special character. Each relation 
may or may not be enclosed in parentheses. If a relation is not enclosed 
in parentheses, it must be separated from the logical operators by at least 
one blank or other special character. 

The following are valid operand fields of SETB instructions: 

1 

(&AREA+2 GT 29) 

(»AB%4' EQ '&ALPHA') 

(T'&ABC NE T'&XYZ) 

(T'&P12 EQ 'F') 

(&AREA+2 GT 29 or &B) 

(NOT &B AND &AREA+X'2D' GT 29) 

C&C'EQ'MB') 

(0) 
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The following are invalid operand fields of SETB instructions: 

&B (not enclosed in parentheses) 

(T'&P12 EQ 'F' &B) (two terms in succession) 

('AB%4' EQ 'ALPHA' NOT &B) (the NOT operator must be preceded by AND or OR) 

(AND T'&P12 EQ 'F') (expression begins with AND) 

Evaluation of Logical Expressions 

The following procedure is used to evaluate a logical expression in 
the operand field of a SETB instruction: 

1. Each term (i.e., arithmetic relation, character relation, or SETB 
symbol) is evaluated and given its logical value (true or false) . 

2. The logical operations are performed moving from left to right. 
However, NOTs are performed before ANDs, and ANDs are performed before 
ORs. 

3. The computed result is the value assigned to the SETB symbol in the 
name field. 

The logical expression in the operand field of a SETB instruction may 
contain one or more sequences of logically combined terms that are enclosed 
in parentheses. A sequence of parenthesized terms may appear within 
another parenthesized sequence. 

The following are examples of SETB instruction operand fields that 
contain parenthesized sequences of terms. 

(NOT (&B AND &AREA+X'2D' GT 29)) 
(&B AND (T'&P12 EQ 'F' OR &B)) 

The parenthesized portion or portions of a logical expression are 
evaluated before the rest of the terms in the expression are evaluated. If 
a sequence of parenthesized terms appears within another parenthesized 
sequence, the innermost sequence is evaluated first. Five levels of 
parentheses are permissible. 

Using SETB Symbols 

The logical value assigned to a SETB symbol is used for the SETB 
symbol appearing in the operand field of an AIF instruction or another SETB 
instruction. 

If a SETB symbol is used in the operand field of a SETA instruction, 
or in arithmetic relations in the operand fields of AIF and SETB 
instructions, the binary values 1 (true) and (false) are converted to the 
arithmetic values +1 and +0, respectively. 
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If a SETB symbol is used in the operand field of a SETC instruction, 
in character relations in the operand fields of AIF and SETB instructions, 
or in any other statement, the binary values 1 (true) and (false), are 
converted to the character values 1 and 0, respectively. 



The following example illustrates these rules. 
L'&TO EQ 4 is true, and S'&TO EQ is false. 



It is assumed that 



1 
2 
3 

4 



Name 


Operation 


Operand 




MACRO 




&NAME 


MOVE 


&TO,&FROM 




LCLA 


&A1 




LCLB 


&B1,&B2 




LCLC 


&C1 


&B1 


SETB 


(L'&TO EQ 4) 


&B2 


SETB 


(S'&TO EQ 0) 


SAl 


SETA 


&B1 


&C1 


SETC 


'&B2' 




ST 


2 , SAVEAREA 




L 


2 , &FR0M&A1 




ST 


2 , &T0&C1 




L 


2 , SAVEAREA 




MEND 




HERE 


MOVE 


FIELDA.FIELDB 


HERE 


ST 


2 , SAVEAREA 




L 


2,FIELDB1 




ST 


2,FIELDA0 




L 


2 , SAVEAREA 



Because the operand field of statement 1 is true, &B1 is assigned the 
binary value 1. Therefore, the arithmetic value +1 is substituted for &B1 
in statement 3. Because the operand field of statement 2 is false, &B2 is 
assigned the binary value 0. Therefore, the character value is 
substituted for &B2 in statement 4. 

AIF — CONDITIONAL BRANCH 

The AIF instruction is used to conditionally alter the sequence in 
which source program statements or macro-definition statements are 
processed by the assembler. The assembler assigns a maximum count of 4096 
AIF and AGO branches that may be executed in the source program or in a 
macro-definition. When a macro-definition calls an inner macro-definition, 
the current value of the count is saved and a new count of 4096 is set up 
for the inner macro-definition. When processing in the inner definition is 



9-24 



completed and a return is made to the higher definition, the saved count is 
restored. The format of this instruction is: 



Name 


Operation 


Operand 


A se- 
quence 
symbol or 
blank 


AIF 


A logical expression 
enclosed in paren- 
theses , immediately 
followed by a 
sequence symbol 



Any logical expression that may be used in the operand field of a SETB 
instruction may be used in the operand field of an AIF instruction. The 
sequence symbol in the operand field must immediately follow the closing 
parenthesis of the logical expression. 

The logical expression in the operand field is evaluated to determine 
if it is true or false. If the expression is true, the statement named by 
the sequence symbol in the operand field is the next statement processed by 
the assembler. If the expression is false, the next sequential statement 
is processed by the assembler. 

The statement named by the sequence symbol may precede or 
AIF instruction. 



follow the 



If an AIF instruction is in a macro-definition, then the sequence 
symbol in the operand field must appear in the name field of a statement in 
the definition. If an AIF instruction appears outside macro-definitions, 
then the sequence symbol in the operand field must appear in the name field 
of a statement outside macro-definitions. 

The following are valid operand fields of AIF instructions: 

(&AREA+X'2D' GT 29) .READER 
(T'&P12 EQ *F'). THERE 
('&FIELD3* EQ'').N03 

The following are invalid operand fields of AIF instructions: 



(T'&ABC NE T'&XYZ) 

.X4F2 

(T'&ABC NE T'&XYZ) 



(no sequence symbol) 
(no logical expression) 
»X4F2 (blanks between logical expression and sequence 
symbol) 



The following macro-definition may be used to generate the statements 
needed to move a full-word fixed-point number from one storage area to 
another. The statements will be generated only if the type attribute of 
both storage areas is the letter F. 
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1 

2 
3 



Name 


Operation 


Operand 




MACRO 




&N 


MOVE 


6tT,&F 




AIF 


(T'&T NE T'&F).END 




AIF 


(T'&T NE 'F').END 


&N 


ST 


2,SAVEAREA 




L 


2,&F 




ST 


2,&T 




L 


2,SAVEAREA 


.END 


MEND 




1 


— ^— —..— ——— — .. — »—^__^ 





The logical expression in the operand field of statement 1 has the 
value true if the type attributes of the two macro-instruction operands are 
not equal. If the type attributes are equal, the expression has the 
logical value false. 

Therefore, if the type attributes are not equal, statement 4 (the 
statement named by the sequence symbol .END) is the next statement 
processed by the assembler. If the type attributes are equal, statement 2 
(the next sequential statement) is processed. 

The logical expression in the operand field of statement 2 has the 
value true if the type attribute of the first macro- instruction operand is 
not the letter F. If the type attribute is the letter F, the expression 
has the logical value false. 

Therefore, if the type attribute is not the letter F, statement 4 (the 
statement named by the sequence symbol .END) is the next statement 
processed by the assembler. If the type attribute is the letter F, 
statement 3 (the next sequential statement) is processed. 

AGO — UNCONDITIONAL BRANCH 

The AGO instruction is used to unconditionally alter the sequence in 
which source program or macro-definition statements are processed by the 
assembler. The assembler assigns a maximum count of 4096 AIF and AGO 
branches that may be executed in the source program or in a macro- 
definition. When a macro-definition calls an inner macro-definition, the 
current value of the count is saved and a new count of 4096 is set up for 
the inner macro-definition. When processing in the inner definition is 
completed and a return is made to the higher definition, the saved count is 
restored. The format of this instruction is: 



9-26 



Name 


Operation 


Operand 


A sequence 
symbol or 
blank 


AGO 


A sequence symbol 



The statement named by the sequence symbol in the operand field is the 
next statement processed by the assembler. 

The statement named by the sequence symbol may precede or follow the 
AGO instruction. 

If an AGO instruction is part of a macro-definition, then the sequence 
symbol in the operand field must appear in the name field of a statement 
that is in that definition. If an AGO instruction appears outside macro- 
definitions, then the sequence symbol in the operand field must appear in 
the name field of a statement outside macro-definitions. 

The following example illustrates the use of the AGO instruction. 



1 
2 
3 



Name 


Operation 


Operand 




MACRO 




&NAME 


MOVE 


&T,&F 




AIF 


(T'&T EQ 'F'). FIRST 




AGO 


.END 


.FIRST 


AIF 


(T'&T NE T'&F).END 


&NAME 


ST 


2,SAVEAREA 




L 


2,&F 




ST 


2,&T 




L 


2,SAVEAREA 


.END 


MEND 





Statement 1 is used to determine if the type attribute of the first 

macro-instruction operand is the letter F. If the type attribute is letter 

F, statement 3 is the next statement processed by the assembler. If the 

type attribute is not the letter F, statement 2 is the next statement 
processed by the assembler. 

Statement 2 is used to indicate to the assembler that the next 
statement to be processed is statement 4 (the statement named by sequence 
symbol .END). 
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ACTR — CONDITIONAL ASSEMBLY LOOP COUNTER 

The ACTR instruction is used to assign a maximum count (different from 
the standard count of 4096) to the number of AGO and AIF branches executed 
within a macro-definition or within the source program. The format of this 
instruction is as follows: 



Name 


Operation 


Operand 


Blank 


ACTR 


Any valid SETA 
expression 



This statement, which can only occur immediately after the global and 
local declarations, causes a counter to be set to the value in the operand 
field. The counter is checked for zero or a negative value; if it is not 
zero or negative, it is decremented by one each time an AGO or AIF branch 
is executed. If the count is zero before decrementing, the assembler will 
take one of two actions: 

1. If processing is being performed inside a macro-definition, the entire 
nest of macro-definitions will be terminated and the next source 
statement will be processed. 

2. If the source program is being processed, an END card will be 
generated. 

An ACTR instruction in a macro-definition affects only that 
definition; it has no effect on the number of AIF and AGO branches that may 
be executed in macro-definitions called. 

ANOP — ASSEMBLY NO OPERATION 

The ANOP instruction facilitates conditional and unconditional 
branching to statements named by symbols or variable symbols. 

The format of this instruction is: 



Name 


Operation 


Operand 


A se- 
quence 

symbol 

... . — .- 


ANOP 


Blank 



If the programmer wants to use an AIF or AGO instruction to branch to 
another statement, he must place a sequence symbol in the name field of the 
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statement to which he wants to branch. However, if the programmer has 
already entered a symbol or variable symbol in the name field of that 
statement, he cannot place a sequence symbol in the name field. Instead, 
the programmer must place an ANOP instruction before the statement and then 
branch to the ANOP instruction. This has the same effect as branching to 
the statement immediately after the ANOP instruction. 

The following example illustrates the use of the ANOP instruction. 



1 
2 
3 
4 



Name 


Operation 


Operand 




MACRO 






&NAME 


MOVE 


&T,&F 






LCLC 


&TYPE 






AIF 


(T'&T EQ 'F') 


.FTYPE 


&TYPE 


SETC 


•E' 




.FTYPE 


ANOP 






&NAME 


ST&TYPE 


2,SAVEAREA 






L&TYPE 


2,&F 






ST&TYPE 


2,&T 






L&TYPE 


2,SAVEAREA 






MEND 




, 



Statement 1 is used to determine if the type attribute of the first 
macro- instruction operand is the letter F. If the type attribute is not 
the letter F, statement 2 is the next statement processed by the assembler. 
If the type attribute is the letter F, statement 4 should be processed 
next. However, since there is a variable symbol (&NAME) in the name field 
of statement 4, the required sequence symbol (.FTYPE) cannot be placed in 
the name field. Therefore, an ANOP instruction (statement 3) must be 
placed before statement 4. 

Then, if the type attribute of the first operand is the letter F, the 
next statement processed by the assembler is the statement named by 
sequence symbol , FTYPE. The value of &TYPE retains its initial null 
character value because the SETC instruction is not processed. Since 
•FTYPE names an ANOP instruction, the next statement processed by the 
assembler in statement 4, the statement following the ANOP instruction. 

CONDITIONAL ASSEMBLY ELEMENTS 

The following chart summarizes the elements that can be used in each 
conditional assembly instruction. Each row in this chart indicates which 
elements can be used in a single conditional assembly instruction. Each 
column is used to indicate the conditional assembly instructions in which 
a particular element can be used. 
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The intersection of a column and a row indicates whether an element 
can be used in an instruction, and if so, in what fields of the instruction 
the element can be used. For example, the intersection of the first row 
and the first column of the chart indicates that symbolic parameters can be 
used in operand field of SETA instructions. 





Variable Symbols 








1 4-^^ 






L — _- 




S.P. 


SET Symbols 






SETA 


SETB 


SETC 


T' 


L' 


S* 


V 


K' 


N' 


S.S. 


SETA 





N. 





03 





















SETB 








N, 





oi 


02 


0^ 


02 


02 


02 




SETC 











N, 

















AIF 














oi 


0^ 


0^ 


02 


02 


02 


N, 


AGO 






















N, 


ANOP 






















N 


ACTR 











03 





















^ Only in c 
^ Only in a 
^ Only if 

Abbreviations 


haracter relations 

rithmetic relations 

ne to eight decimal digits 


N is Name 
is Opera 
S.P. is Symbc 
Paran 


L 
md S 
die I 
leter 


' is L€ 
' is Sc 
' is Ir 


mgth A 

baling 

iteger 


ttril 
AttrJ 
Attrj 


)ute 

Lbute 
Lbute 


S.S 


is 
is 

. is 


Count 
Numbe 
Sequel 


Attr 
r Att 
nee S 


ibute 

ribute 

ymbol 
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SECTION 10: EXTENDED FEATURES OF THE MACRO LANGUAGE 

The extended features of the macro language allow the programmer to: 
1. Terminate processing of a macro-definition. 

Generate error messages. 

Define global SET symbols. 

Define subscripted SET symbols. 

Use system variable symbols • 



2. 
3. 
4. 
5. 
6. 



Prepare keyword and mixed-mode macro definitions and write 
keyword and mixed-mode macro-instructions. 



7. Use other System/360 macro-definitions. 

MEXIT — MACRO-DEFINITION EXIT 

The MEXIT instruction is used to indicate to the assembler that it 
should terminate processing of a macro-definition. The format of this 
instruction is: 



Name 


Operation 


Operand 


A sequence 
symbol or 
blank 


MEXIT 


Blank 



The MEXIT instruction may only be used in a macro-definition. 

If the assembler processes a MEXIT instruction that is in a macro- 
definition corresponding to an outer macro- instruction, the next statement 
processed by the assembler is the next statement outside macro-definitions. 

If the assembler processes a MEXIT instruction that is in a macro- 
definition corresponding to a second or third level macro-instruction, the 
next statement processed by the assembler is the next statement after the 
second or third level macro-instruction in the macro - definition, 
respectively. 

MEXIT should not be confused with MEND. MEND indicates the end of a 
macro-definition. MEND must be the last statement of every macro- 
definition, including those that contain one or more MEXIT instructions. 
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The following example illustrates the use of the MEXIT instruction. 



1 
2 
3 



Name 


Operation 


Operand 






MACRO 






&NAME 


MOVE 


&T,&F 






AIF 


(T'&T EQ 'F 


').0K 




MEXIT 






• OK 


ANOP 






&NAME 


ST 


2 , SAVEAREA 






L 


2,&F 






ST 


2,&T 






L 


2, SAVEAREA 




> 


MEND 







Statement 1 is used to determine if the type attribute of the first 
macro-instruction operand is the letter F. If the type attribute is the 
letter F, the assembler processes the remainder of the macro-definition 
starting with statement 3. If the type attribute is not the letter F, the 
next statement processed by the assembler is statement 2. Statement 2 
indicates to the assembler that it is to terminate processing of the macro- 
definition, 

MNOTE — REQUEST FOR ERROR MESSAGE 

The MNOTE instruction may be used to request the assembler to generate 
an error message. The format of this instruction is: 



Name 


Operation 


Operand 


A sequence 


MNOTE 


A severity code, 


symbol. 




followed by 


variable 




a comma, followed 


symbol or 




by any combination 


blank 




of characters en- 
closed in apostro- 
phes 



The operand of the MNOTE instruction may also be written using one of 
the following forms: 
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Operand 

Severity-code, 'message* 

'message' 
'message' 



The MNOTE instruction may only be used in a macro-definition. 
Variable symbols may be used to generate the MNOTE mnemonic operation code, 
the severity code, and the message. 

The severity code may be a decimal integer from through 255 or an 
asterisk. If it is omitted, 1 is assumed. The severity code indicates the 
severity of the error, a higher severity code indicating a more serious 
error. 



When MNOTE * occurs , 
printed as a comment. 



the statement in the operand field will be 



Two apostrophes must be used to represent an apostrophe enclosed in 
apostrophes in the operand field of an MNOTE instruction. One apostrophe 
will be listed for each pair of apostrophes in the operand field. If any 
variable symbols are used in the operand field of an MNOTE instruction, 
they will be replaced by the values assigned to them. Two ampersands must 
be used to represent an ampersand that is not part of a variable symbol in 
the operand field of a MNOTE statement. One ampersand will be listed for 
each pair of ampersands in the operand field. 

The following example illustrates the use of the MNOTE instruction. 





Name 


Operation 


Operand 






MACRO 






&NAME 


MOVE 


&T,&F 






MNOTE 


*.'MOVE MACRO GEN' 


1 




AIF 


(T'&T NE T'&F).M1 


2 




AIF 


(T'&T NE 'F').M2 


3 


&NAME 


ST 


2,SAVEAREA 






L 


2,&F 






ST 


2,&T 






L 


2,SAVEAREA 






MEXIT 




4 


.Ml 


MNOTE 
MEXIT 


'TYPE NOT SAME' 


5 


.M2 


MNOTE 


'TYPE NOT F' 






MEND 
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Statement 1 is used to determine if the type attributes of both macro- 
instruction operands are the same. If they are, statement 2 is the next 
statement processed by the assembler. If they are not, statement 4 is the 
next statement processed by the assembler. Statement 4 causes an error 
message indicating the type attributes are not the same to be printed in 
the source program listing. 

Statement 2 is used to determine if the type attribute of the first 
macro- instruction operand is the letter F. If the type attribute is the 
letter F, statement 3 is the next statement processed by the assembler. If 
the attribute is not the letter F, statement 5 is the next statement 
processed by the assembler. Statement 5 causes an error message indicating 
the type attribute is not F to be printed in the source program listing. 

GLOBAL AND LOCAL VARIABLE SYMBOLS 

The following are local variable symbols : 

1. Symbolic parameters. 

2. Local SET symbols. 

3. System variable symbols. 

Global SET symbols are the only global variable symbols. 

The GBLA, GBLB, and GBLC instructions define global SET symbols, just 
as the LCLA, LCLB, and LCLC instructions define the SET symbols described 
in Section 9. Hereinafter, SET symbols defined by LCLA, LCLB, and LCLC 
instructions will be called local SET symbols. 

Global SET symbols communicate values between statements in one or 
more macro-definitions and statements outside macro-definitions. However, 
local SET symbols communicate values between statements in the same macro- 
definition, or between statements outside macro-definitions. 

If a local SET symbol is defined in two or more macro-definitions, or 
in a macro-definition and outside macro-definitions, the SET symbol is 
considered to be a different SET symbol in each case. However, a global 
SET symbol is the same SET symbol each place it is defined, 

A SET symbol must be defined as a global SET symbol in each macro- 
definition in which it is to be used as a global SET symbol. A SET Symbol 
must be defined as a global SET symbol outside macro-definitions, if it is 
to be used as a global SET symbol outside macro-definitions. 

If the same SET symbol is defined as a global SET symbol in one or 
more places, and as a local SET S3anbol elsewhere, it is considered the same 
symbol wherever it is defined as a global SET sjnnbol, and a different 
symbol wherever it is defined as a local SET symbol. 
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Defining Local and Global SET Symbols 

Local SET symbols are defined when they appear in the operand field of 
an LCLA, LCLB, or LCLC instruction. These instructions are discussed in 
Section 9 under "Defining SET Symbols." 

Global SET symbols are defined when they appear in the operand field 
of a GBLA, GBLB, or GBLC instruction. The format of these instructions is: 



Name 



Operation 



Operand 



Blank 



I. 



GBLA, 
GBLB, or 
GBLC 



One or more variable 
symbols that are to be 
used as SET symbols, 
separated by commas 



The GBLA, GBLB, and GBLC instructions define global SETA, SETB, and 
SETC symbols, respectively, and assign the same initial values as the 
corresponding types of local SET symbols. However, a global SET symbol is 
assigned an initial value by only the first GBLA, GBLB, or GBLC instruction 
processed in which the symbol appears. Subsequent GBLA, GBLB, or GBLC 
instructions processed by the assembler do not affect the value assigned to 
the SET symbol. 



The programmer should not define any global SET symbols 
four characters are &SYS. 



whose first 



If a GBLA, GBLB, or GBLC instruction is part of a macro-definition, it 
must immediately follow the prototype statement, or another GBLA, GBLB, or 
GBLC instruction. GBLA, GBLB, and GBLC instructions outside macro- 
definitions must appear after all macro-definitions in the source program, 
before all conditional assembly instructions and PUKCH and REPRO statements 
outside macro-definitions, and before the first control section of the 
program. 

All GBLA, GBLB, and GBLC instructions in a macro-definition must 
appear before all LCLA, LCLB , and LCLC instructions in that macro- 
definition. All GBLA, GBLB, and GBLC instructions outside macro- 
definitions must appear before all LCLA, LCLB, and LCLC instructions 
outside macro-definitions. 

Using Global and Local SET Symbols 

The following examples illustrate the use of global and local SET 
symbols. Each example consists of two parts. The first part is an 
assembler language source program. The second part shows the statements 
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that would be generated by the assembler after it processed the 
in the source program. 



statements 



Example 1 : This example illustrates how the same SET symbol can be used to 
communicate (1) values between statements in the same macro-definition, and 
(2) different values between statements outside macro-definitions. 





Name 


Operation 


Operand 






MACRO 






&NAME 


LOADA 




1 




LCLA 


&A 


2 


&NAME 


LR 


15, &A 


3 


&A 


SETA 
MEND 


&A+1 


4 




LCLA 


S.A 




FIRST 


LOADA 




5 




LR 
LOADA 


15, &A 


6 




LR 


15, &A 






END 


FIRST 




FIRST 


LR 


15,0 






LR 


15,0 






LR 


15,0 






LR 


15,0 






END 


FIRST 



&A is defined as a local SETA symbol in a macro-definition (statement 
1) and outside macro-definitions (statement 4), &A is used twice within 
the macro - definition (statements 2 and 3) and twice outside macro- 
definitions (statements 5 and 6) . 

Since &A is a local SETA symbol in the macro-definition and outside 
macro- definitions, it is one SETA symbol in the macro-definition, and 
another SETA symbol outside macro-definitions. Therefore, statement 3 
(which is in the macro-definition) does not affect the value used for 6tA in 
statements 5 and 6 (which are outside macro-definitions). Moreover, the 
use of LOADA between statements 5 and 6 will alter &A from its previous 
value as a local symbol within that macro-definition since the fir$t act of 
the macro-definition is to LCLA &A to zero. 

Example 2 ; This example illustrates how a SET s3rmbol can be used to 
communicate values between statements that are part of a macro-definition 
and statements outside macro-definitions. 
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1 

2 
3 

4 

5 

6 



Name 


Operation 


Operand 




MACRO 




&NAME 


LOADA 






GBLA 


&A 


&NAHE 


LR 


15, &A 


&A 


SETA 
MEND 


&A+1 




GBLA 


&A 


FIRST 


LOADA 






LR 


15, &A 




LOADA 






LR 


15, &A 




END 


FIRST 


FIRST 


LR 


15,0 




LR 


15,1 




LR 


15,1 




LR 


15,2 




END 


FIRST 





&A is defined as a global SETA symbol in a macro-definition (statement 
1) and outside macro-definitions (statement 4) . &A is used twice within 
the macro-definition (statements 2 and 3) and twice outside macro- 
definitions (statements 5 and 6), 

Since &A is a global SETA symbol in the macro-definition and outside 
macro-definitions, it is the same SETA symbol in both cases. Therefore, 
statement 3 (which is in the macro-definition) affects the value used for 
&A in statements 5 and 6 (which are outside macro-definitions). 

Example 3: This example illustrates how the same SET S3nnbol can be used to 
communicate: (1) values between statements in one macro-definition, and 
(2) different values between statements in a different macro-definition. 

&A is defined as a local SETA symbol in two different macro- 
definitions (statements 1 and 4). &A is used twice within each macro- 
definition (statements 2, 3, 5, and 6), 

Since &A is a local SETA symbol in each macro-definition, it is one 
SETA symbol in one macro-definition, and another SETA symbol in the other 
macro-definition. Therefore, statement 3 (which is in one macro- 
definition) does not affect the value used for &A in statement 5 (which is 
in the other macro-definition). Similarly, statement 6 does not affect the 
value used for &A in statement 2. 
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Name 


Operation 


Operand 






MACRO 






&NAME 


LOADA 




1 




LCLA 


&A 


2 


&NAME 


LR 


15, &A 


3 


&A 


SETA 
MEND 
MACRO 
LOADB 


&A+1 


4 




LCLA 


&A 


5 




LR 


15, &A 


6 


&A 


SETA 
MEND 


&A+1 




FIRST 


LOADA 
LOADB 
LOADA 
LOADB 








END 


FIRST 




FIRST 


LR 


15,0 






LR 


15,0 






LR 


15,0 






LR 


15,0 






END 


FIRST 


Examp 


>le 4: This e> 


cample illustrates how a SET symbol 



can be used to 
communicate values between statements that are part of two different macro- 
definitions. 
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Name 


Operation 


Operand 






MACRO 






&NAME 


LOADA 




1 




GBLA 


&A 


2 


&NAME 


LR 


15, &A 


3 


&A 


SETA 
MEND 

MACRO 
LOADB 


&A+1 


4 




GBLA 


&A 


5 




LR 


15, &A 


6 


&A 


SETA 
MEND 


&A+1 




FIRST 


LOADA 
LOADB 
LOADA 
LOADB 








END 


FIRST 




FIRST 


LR 


15,0 






LR 


15.1 






LR 


15,2 






LR 


15,3 






END 


FIRST 






. — 


J 



&A is defined as a global SETA „ symbol in two different macro- 
definitions (statements 1 and 4). &A is used twice within each macro- 
definition (statements 2, 3, 5 and 6). 

Since &A is a global SETA symbol in each macro-definition, it is the 
same SETA symbol in each macro-definition. Therefore, statement 3 (which 
is in one macro-definition) affects the value used for &A in statement 5 
(which is in the other macro-definition). Similarly, statement 6 affects 
the value used for &A in statement 2. 

Example 5: This example illustrates how the same SET symbol can be used to 
communicate : (1) values between statements in two different macro- 
definitions, and (2) different values between statements outside macro- 
definitions. 
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1 

2 
3 



4 
5 
6 



Name 



&NAME 
&NAME 



&A 



FIRST 



FIRST 



Operation 



MACRO 

LOADA 

GBLA 

LR 

SETA 

MEND 

MACRO 

LOADB 

GBLA 

LR 

SETA 

MEND 

LCLA 

LOADA 

LOADB 

LR 

LOADA 

LOADB 

LR 

END 



LR 
LR 
LR 
LR 
LR 
LR 
END 



Operand 



&A 

15, &A 
&A+1 



&A 

15, &A 
&A+1 

&A 



15, &A 



15, &A 
FIRST 



15,0 
15,1 
15,0 
15,2 
15,3 
15,0 
FIRST 



&A is defined as a global SETA symbol in two different macro- 
definitions (statements 1 and 4) , but it ±s defined as a local SETA symbol 
outside macro-definitions (statement 7) . &A is used twice within each 
macro-definition and twice outside macro-definitions (statements 2, 3, 5, 
6, 8 and 9). 

Since &A is a global SETA symbol in each macro-definition, it is the 
same SETA symbol in each macro-definition. However, since &A is a local 
SETA symbol outside macro-definitions, it is a different SETA symbol 
outside macro-definitions. 

Therefore, statement 3 (which is in one macro-definition) affects the 
value used for &A in statement 5 (which is in the other macro-definition) , 
but it does not affect the value used for &A in statements 8 and 9 (which 
are outside macro-definitions). Similarly, statement 6 affects the value 
used for &A in statement 2, but it does not affect the value used for &A in 
statements 8 and 9. 
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Subscripted SET Symbols 

Both global and local SET symbols may be defined as subscripted SET 
symbols. The local SET symbols defined In Section 9 were all 
nonsubscripted SET symbols. 

Subscripted SET symbols provide the programmer with a convenient way 
to use one SET symbol plus a subscript to refer to many arithmetic, binary, 
or character values. 

A subscripted SET symbol consists of a SET symbol immediately followed 
by a subscript that is enclosed in parentheses. The subscript may be any 
arithmetic expression that is allowed in the operand field of a SETA 
statement. The subscript may not be or negative. 

The following are valid subscripted SET symbols. 

&READER(17) 

&A23456(&S4) 

&X4F2(25+&A2) 

The following are invalid subscripted SET symbols. 

&X4F2 (no subscript) 

(25) (no SET symbol) 

&X4F2 (25) (subscript does not immediately follow SET symbol) 

Defining Subscripted SET Symbols; If the programmer wants to use a 
subscripted SET symbol, he must write in a GBLA, GBLB, GBLC, LCLA, LCLB, or 
LCLC instruction, a SET symbol immediately followed by a decimal integer 
enclosed in parentheses. The decimal integer, called a dimension, 
indicates the number of SET variables associated with the SET symbol. 
Every variable associated with a SET symbol is assigned an initial value 
that is the same as the initial value assigned to the corresponding type of 
nonsubscripted SET symbol. 

If a subscripted SET symbol is defined as global, the same diioension 
must be used with the SET symbol each time it is defined as global. 

The maximum dimension that can be used with a SETA, SETB, or SETC 
symbol is 2500. 

A subscripted SET symbol may be used only if the declaration was 
subscripted; a nonsubscripted SET symbol may be used only if the 
declaration had no subscript. 

The following statements define the global SET symbols &SBOX, &WBOX, 
and &PSW, and the local SET symbol 6rTSW. &SBOX has 50 arithmetic variables 
associated with it, &WBOX has 20 character variables, &FSW and &TSW 
each have 230 binary variables. 
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Name 


Operation 


Operand 




GBLA 
GBLC 
GBLB 
LCLB 


&SBOX(50) 
&WB0X(20) 
&PSW(230) 
&TSW(230) 



Using Subscripted SET Symbols: After the programmer has associated a 
number of SET variables with a SET symbol, he may assign values to each of 
the variables and use them in other statements. 

If the statements in the previous example were part of a macro- 
definition, (and &A was defined as a SETA symbol in the same definition), 
the following statements could be part of the same macro-definition. 



1 
2 
3 
4 
5 



Name 


Operation 


Operand 


&A 

&PSW(&A) 

&TSW(9) 


SETA 

SETB 

SETB 

A 

CLI 


5 

(6 LT 2) 

(&PSW(&A)) 

2,=F'&SBOX(45)' 

AREA,C'&WB0X(17)' 



Statement 1 assigns the arithmetic value 5 to the nonsubscripted SETA 
symbol &A. Statements 2 and 3 then assign the binary value to 
subscripted SETB symbols &PSW(5) and &TSW(9), respectively. Statements 4 
and 5 generate statements that add the value assigned to &SBOX(45) to 
general register 2, and compare the value assigned to &WB0X(17) to the 
value stored at AREA, respectively. 

SYSTEM VARIABLE SYMBOLS 

System variable symbols are local variable symbols that are assigned 
values automatically by the assembler. There are three system variable 
symbols: &SYSNDX, &SYSECT, and &SYSLIST. System variable symbols may be 
used in the name, operation and operand fields of statements in macro- 
definitions, but not in statements outside macro-definitions. They may not 
be defined as symbolic parameters or SET symbols, nor may they be assigned 
values by SETA, SETB, and SETC instructions. 



&SYSNDX 



Macro-Instruction Index 



The system variable symbol &SYSNDX may be concatenated with other 
characters to create unique names for statements generated from the same 
model statement. 
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&SYSNDX ±8 assigned the four-digit nxuober 0001 for the first macro- 
instruction processed by the assembler » and it is incremented by one for 
each subsequent inner and outer macro- instruction processed. 

If &SYSNDX is used in a model statement, SETC or MNOTE instruction, or 
a character relation in a SETB or AIF instruction, the value substituted 
for &SYSNDX is the four-digit number of the macro- instruction being 
processed, including leading zeros. 

If &SYSNDX appears in arithmetic expressions (e.g., in the operand 
field of a SETA instruction), the value used for &SYSNDX is an arithmetic 
value . 

Throughout one use of a macro-definition, the value of £tSYSNDX may be 
considered a constant, independent of any inner macro- instruction in that 
definition. 

The example in the next column illustrates these rules. It is assumed 
that the first macro- instruction processed, OUTERl, is the 106th macro- 
instruction processed by the assembler. 

Statement 7 is the 106th macro- instruction processed. Therefore, 
4SYSNDX is assigned the number 0106 for that macro-instruction. The number 
0106 is substituted for &SYSNDX when it is used in statements 4 and 6. 
Statement 4 is used to assign the character value 0106 to the SETC symbol 
&NDXNUM. Statement 6 is used to create the unique name B0106. 
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2 
3 



5 
6 



7 

a 



Name 


Operation 


Operand 




MACRO 






INNERl 






GBLC 


&NDXNUM 


A&SYSNDX 


SR 


2,5 




CR 


2,5 




BE 


B&NDXNUM 




B 


A&SYSNDX 




MEND 






MACRO 




&NAME 


OUTERl 






GBLC 


&NDXNUM 


&NDXNUM 


SETC 


'&SYSNDX' 


&NAME 


SR 


2,4 




AR 


2,6 




INNERl 




B&SYSNDX 


S 
MEND 


2,-F'lOOO' 


ALPHA 


OUTERl 




BETA 


OUTERl 




ALPHA 


SR 


2,4 




AR 


2,6 


A0107 


SR 


2,5 




CR 


2,5 




BE 


B0106 




B 


A0107 


B0106 


S 


2,=F'1000' 


BETA 


SR 


2,4 




AR 


2,6 


A0109 


SR 


2,5 




CR 


2,5 




BE 


B0108 




B 


A0109 


B0108 


S 


2, -F' 1000' 



Statement 5 is the 107th macro-Instruction processed. Therefore, 
&SYSNDX is assigned the number 0107 for that macro- Instruction. The number 
0107 is substituted for &SYSNDX when it is used in statements 1 and 3. The 
number 0106 is substituted for the global SETC symbol &NDXNUM in statement 

Statement 8 Is the 108th macro-instruction processed. Therefore, each 
occurrence of &SYSNDX is replaced by the number 0108. For example, 
statement 6 is used to create the unique name B0108. 
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When statement 5 is used to process the 108th macro- instruction, 
statement 5 becomes the 109th macro-instruction processed. Therefore, each 
occurrence of &SYSNDX is replaced by the nymber 0109. For example, 
statement 1 is used to create the unique ixame A0109. 

&SYSECT — Current Control Section 

The system variable symbol &SYSECT may be used to represent the name 
of the control section in which a macro-instruction appears. For each 
inner and outer macro- instruction processed by the assembler, &SYSECT is 
assigned a value that is the name of the control section in which the 
macro- instruction appears. 

When &SYSECT is used in a macro-definition, the value substituted for 
&SYSECT is the name of the last CSECT, DSECT, or START statement that 
occurs before the macro- instruction. If no named CSECT, DSECT, or START 
statements occur before a macro-instruction, &SYSECT is assigned a null 
character value for that macro-instruction. 

CSECT or DSECT statements processed in a macro-definition affect the 
value for &SYSECT for any subsequent inner macro-instructions in that 
definition, and for any other outer and inner macro-instructions. 

Throughout the use of a macro-definition, the value of &SYSECT may be 
considered a constant, independent of any CSECT or DSECT statements or 
inner macro- instructions in that definition. 

The next example illustrates these rules. 

Statement 8 is the last CSECT, DSECT, or START statement processed 
before statement 9 is processed. Therefore, &SYSECT is assigned the value 
MAINPROG for macro-instruction OUTERl in statement 9. MAINPROG is 
substituted for &SYSECT when it appears in statement 6. 

Statement 3 is the last CSECT, DSECT, or START statement processed 
before statement 4 is processed. Therefore, &SYSECT is assigned the value 
CSOUTl for macro-instruction INNER in statement 4. CSOUTl is substituted 
for &SYSECT when it appears in statement 2. 

Statement 1 is used to generate a CSECT statement for statement 4. 
This is the last CSECT, DSECT, or START statement that appears before 
statement 5. Therefore, &SYSECT is assigned the value INA for macro- 
instruction INNER in statement 5. INA is substituted for &SYSECT when it 
appears in statement 2. 
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Name 


Operation 


Operand 






MACRO 








INNER 


&INCSECT 


1 


&INCSECT 


CSECT 




2 




DC 
MEND 

MACRO 
OUTERl 


A(&SYSECT) 


3 


CSOUTl 


CSECT 








DS 


lOOC 


4 




INNER 


INA 


5 




INNER 


INB 


6 




DC 

MEND 

MACRO 
0UTER2 


A(&SYSECT) 


7 




DC 


A(&SYSECT) 






MEND 




8 


MAINPROG 


CSECT 








DS 


200C 


9 




OUTERl 




10 




0UTER2 






MAINPROG 


CSECT 








DS 


200C 




CSOUTl 


CSECT 








DS 


lOOC 




INA 


CSECT 








DC 


A(CSOUTl) 




INB 


CSECT 








DC 


A (INA) 






DC 


A(MAINPROG) 







DC 


A (INB) 



Statement 1 is used to generate a CSECT statement for statement 5, 
This is the last CSECT, DSECT, or START statement that appears before 
statement 10. Therefore, &SYSECT is assigned the _yaiue, INB for macro- 
instruction 0IITBR2 in statement 10. INB is substituted for &SYSECT when 
it appears in statement 7. 
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&SYSLIST — Macro-Instruction Operand 



The system variable symbol &SYSLIST provides the programmer with an 
alternative to symbolic parameters for referring to positional macro- 
instruction operands*! 

&SYSLIST and symbolic parameters may be used in the same macro- 
definition. 

&SYSLIST(0) may be used to refer to a symbolic parameter in the macro- 
instruction prototype. If the symbolic parameter is omitted in the macro- 
instruction prototype, then &SYSLIST(0) would refer to a null character 
value. 

&SYSLIST (n) may be used to refer to the nth positional macro- 
instruction operand. In addition, if the nth operand is a subllst, then 
&SYSLIST (n,m) may be used to refer to the mth operand in the sublist, 
where n and m may be any arithmetic expressions allowed in the operand 
field of a SETA statement, m may be equal to or greater than 1 and n has 
a range of 1 to 200. 

If the value of "subscript n is zero", then &SYSLIST(n) is assigned 
the value specified in the name field of the macro-instruction, except when 
it is a sequence symbol. 

The type, length, scaling. Integer, and count attributes of 
&SYSLIST(n) and &SYSLIST(n,m) and the number attributes of &SYSLIST(n) and 
&SYSLIST may be used in conditional assembly Instructions. N'&SYSLIST may 
be used to refer to the total number of positional operands in a macro- 
instruction statement. N'&SYSLIST(n) may be used to refer to the number of 
operands in a sublist. If the nth operand is omitted, N* is zero; if the 
nth operand is not a sublist, N* is one. 

The following procedure is used to evaluate N'&SYSLIST: 

1. A sublist is considered to be one operand. 

2. The count includes operands specifically omitted (by means of 
commas) • 

Examples : 

Macro- Instruction N'&SYSLIST 

MAC K1=DS 

MAC ,K1«DC 1 

MAC FULL,,F,('1','2'),K1-DC 4 

MAC , 2 

MAC 

Attributes are discussed in Section 7 under "Attributes." 
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KEYWORD MACRO-DEFINITIONS AND INSTRUCTIONS 

Keyword macro-definitions provide the programmer with an alternate way 
of preparing macro-definitions. 

A keyword macro-definition enables a programmer to reduce the number 
of operands in each macro-instruction that corresponds to the definition, 
and to write the operands in any order. 

The macro-instructions that correspond to the macro-definitions 
described in Section 7 (hereinafter called positional macro-instructions 
and positional macro-definitions, respectively) require the operands- to be 
written in the same order as the corresponding symbolic parameters in the 
operand field of the prototype statement. 

In a keyword macro-definition, the programmer can assign standard 
values to any symbolic parameters that appear in the operand field of the 
prototype statement. The standard value assigned to a symbolic parameter 
is substituted for the symbolic parameter, if the programmer does not write 
anything in the operand field of the macro-instruction to correspond to the 
symbolic parameter. 

When a keyword macro-instruction is written, the programmer need only 
write one operand for each symbolic parameter whose value he wants to 
change . 

Keyword macro-definitions are prepared the same way as positional 
macro-definitions, except that the prototype statement is written 
differently. The rules for preparing positional macro-definitions are in 
Section 7. 

Keyword Prototype 

The format of this statement is: 



Name 


Operation 


Operand 


A symbolic 
parameter 
or blank 


A symbol 


One or more 
operands of the 
form described 
below, separated 

by commas 




Each operand must consist of a symbolic parameter, immediately 
followed by an equal sign and optionally followed by a standard value. 
This value must not include a keyword. 
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A standard value that is part of an operand must immediately follow 
the equal sign. 

Anything that may be used as an operand in a macro-instruction except 
variable symbols, may be used as a standard value in a keyword prototype 
statement. The rules for forming valid macro-instruction operands are 
detailed in Section 8, 

The following are valid keyword prototype operands. 

&READER= 

&L00P2-SYMB0L 

&S4=-F*4096' 

The following are invalid keyword prototype operands. 



CARDAREA 
&TYPE 
&TWO =123 

&AREA=X X*189A' 



(no symbolic parameter) 

(no equal sign) 

(equal sign does not immediately follow symbolic 

parameter) 
(standard value does not immediately follow equal 

sign) 



The following keyword prototype statement contains a symbolic 
parameter in the name field, and four operands in the operand field. The 
first two operands contain standard values. The mnemonic operation code is 
MOVE. 



Name 


Operation 


Operand 


&N 


MOVE 


1 

&R-2,&A»S,&T-,&F» 



Keyword Macro-Instruction 

After a programmer has prepared a keyword macro-definition he may use 
it by writing a keyword macro-instruction. 

The format of a keyword macro-instruction is : 



Name 


Operation 


Operand 


A symbol, 
sequence 
symbol, 
or blank 


Mnemonic 

operation 

code 


Zero or more operands 
of the form described 
below, separated by 
commas 
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Each operand consists of a keyword immediately followed by an equal 
sign and an optional value which may not include a keyword. Anything that 
may be used as an operand in a positional macro -instruct ion may be used as 
a value in a keyword macro-instruction. The rules for forming valid 
positional macro- instruction operands are detailed in Section 8. 

A keyword consists of one through seven letters and digits, the first 
of which must be a letter. 

The keyword part of each keyword macro-instruction operand must 
correspond to one of the symbolic parameters that appears in the operand 
field of the keyword prototype statement. A keyword corresponds to a 
symbolic parameter if the characters of the keyword are identical to the 
characters of the symbolic parameter that follow the ampersand. 

The following are valid keyword macro-instruction operands. 

L00P2-SYMB0L 
S4— F*4096' 
TO- 

The following are invalid keyword macro-instruction operands. 

&X4F2-0(2,3) (keyword does not begin with a letter) 

CARDAREA"A+2 (keyword is more than seven characters) 

« (TO (8), (FROM)) (no keyword) 

The operands in a keyword macro-instruction may be written in any 
order. If an operand appeared in a ke3rword prototype statement, a 
corresponding operand does not have to appear in the keyword macro- 
instruction. If an operand is omitted, the comma that would have separated 
it from the next operand need not be written. 

The following rules are used to replace the symbolic parameters in the 
statements of a keyword macro-definition. 

1. If a symbolic parameter appears in the name field of the 
prototype statement, and the name field of the macro-instruction 
contains a symbol, the symbolic parameter is replaced by the 
symbol. If the name field of the macro- instruction is blank or 
contains a sequence symbol, the symbolic parameter is replaced by 
a null character value. 

2. If a symbolic parameter appears in the operand field of the 
prototype statement, and the macro-instruction contains a keyword 
that corresponds to the symbolic parameter, the value assigned to 
the keyword replaces the symbolic parameter. 

3. If a symbolic parameter was assigned a standard value by a 
prototype statement, and the macro-instruction does not contain 
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a keyword that corresponds to the symbolic parameter, the 

standard value assigned to the symbolic paranieter replaces the 

symbolic parameter. Otherwise, the symbolic parameter is 
replaced by a null character value. 

Note 1: \ If a standard value is a self-defining term, the type attribute 
assigned to the standard value is the letter N. If a standard value is 
omitted the type attribute assigned to the standard value is the letter 0. 
All other standard values are assigned the type attribute U. 

Note 2; Positional parameters cannot be changed to keywords by 
substitution. That is, in the following example, the expression A«FB, 
statement 2, will be treated as a positional operand consisting of a 
character string in the generation of the MAC macro; it will not be treated 
as a keyword A with the value FB. 



1 
2 
3 



Name 


1 

Operation 


Operand 


&VALUE 


GBLC 
SETC 
MAC 


&VALUE 
'A-FB' 
&VALUE 



The following keyword macro-deflnltlon, keyword macro-Instruction, and 
generated statements Illustrate these rules. 



1 
2 
3 
4 
5 



Name 


Operation 


-r— - 

Operand 


&N 
&N 


MACRO 

MOVE 

ST 

L 

ST 

L 

MEND 


6iR-2,&A-S,&T-,&F- 

£<R,&A 

&R,&F 

&R,&T 

&R,&A 


HERE 
HERE 


MOVE 

ST 
L 
ST 
L 


T-FA,F-FB,AHTHERE 


2, THERE 
2,FB 
2, FA 
2, THERE 
L-. 



Statement 1 assigns the standard values 2 and S to the symbolic 
parameters &R and &A, respectively. Statement 6 assigns the values FA, FB, 
and THERE to the keywords T, F, and A, respectively. The symbol HERE is 
used in the name field of statement 6. 
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Since a symbolic parameter (&N) appears In the name field of the 
prototype statement (statement 1), and the corresponding characters (HERE) 
of the macro-instruction (statement 6) are a symbol, &N is replaced by HERE 
in statement 2, 

Since &T appears in the operand field, of statement 1, and statement 
6 contains the keyword (T) that corresponds to &T, the value assigned to T 
(FA) replaces &T in statement 4. Similarly, FB and THERE replace &F and &A 
in statement 3 and in statements 2 and 5, respectively. Note that the 
value assigned to &A in statement 6 is used instead of the value assigned 
to &A in statement 1, 

Since &R appears in the operand field of statement 1, and statement 6 
does not contain a corresponding keyword, the value assigned to &R (2), 
replaces &R in statements 2, 3, 4, and 5. 

Operand Sublists ; The value assigned to a keyword and the standard value 
assigned to a symbolic parameter may be an operand sublist. Anything that 
may be used as an operand sublist in a positional macro-instruction may be 
used as a value in a keyword macro-instruction and as a standard value in 
a keyword prototype statement. The rules for forming valid operand 
sublists are detailed in Section 8 under "Operand Sublists." 

Keyword Inner Macro-Instructions: Keyword and positional inner macro- 
instructions may be used as model statements in either keyword or 
positional macro-definitions. 

MIXED-MODE MACRO-DEFINITIONS AND INSTRUCTIONS 

Mixed-mode macro-definitions allow the programmer to use the features 
of keyword and positional macro-definitions in the same macro-definition. 

Mixed-mode macro-definitions are prepared the same way as positional 
macro-definitions, except that the prototype statement is written 
differently. If &SYSLIST is used, it refers only to the positional 
operands in the macro- instruction. Subscripting past the last positional 
parameter will yield an empty string and a type attribute of "0". The 
rules for preparing positional macro definitions are in Section 7. 

Mixed-Mode Prototype 

The format of this statement is : 
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Name 

A symbolic 
parameter 
or blank 


Operation 
A symbol 


Operand 

One or more oper- 
ands of the form 
described below, 
separated by 
commas 



The operands must be valid operands of positional and keyword 
prototype statements. All the positional operands must precede the first 
keyword operand. The rules for forming positional operands are discussed 
in Section 7, under "Macro-Instruction Prototype." The rules for forming 
keyword operands are discussed above under "Keyword Prototype." 

The following sample mixed-mode prototype statement contains three 
positional operands and two keyword operands. 



Name 


Operation 


&N 


MOVE 



Operand 



&TY,&P,&R,&TO«,&F- 



Mixed-Mode Macro-Instruction 

The format of a mixed-mode macro-instruction is: 



Name 


Operation 


Operand 


A symbol, 
sequence 
symbol, 
or blank 


Mnemonic 

operation 

code 


Zero or more operands 
of the form described 
below, separated by 
commas 



The operand field consists of two parts. The first part corresponds 
to the positional prototype operands. This part of the operand field is 
written in the same way that the operand field of a positional macro- 
instruction is written. The rules for writing positional macro- 
instructions are in Section 8. 

The second part of the operand field corresponds to the keyword 
prototype operands. This part of the operand field is written in the same 
way that the operand field of a keyword macro-instruction is written. The 
rules for writing keyword macro-instructions are described above under 
"Keyword Macro-Instruction." 
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The following mixed-mode macro-definition, mixed-inode 
instruction, and generated statements illustrate these facilities. 



macro- 



Name 


Operation 


Operand 




MACRO 




&N 


MOVE 


&TY,&P,&R,&TO-,&F- 


&N 


ST&TY 


&R,SAVE 




L&TY 


,&R,&P&F 




ST&TY 


&R,&P&TO 




L&TY 


, &R,SAVE 


HERE 


MOVE 


H,,2,F-FB,T0-FA 


HERE 


STH 


2, SAVE 




LH 


2,FB 




STH 


2, FA 




LH 


2 , SAVE 









The prototype statement (statement 1) contains three positional 
operands (&TY,&P, and &R) and two keyword operands (&T0 and &F) . In the 
macro-instruction (statement 2) the positional operands are written in the 
same order as the positional operands in the prototype statement (the 
second operand is omitted) . The keyword operands are written in an order 
that is different from the order of keyword operands in the prototype 
statement. 

Mixed-mode inner macro-instructions may be used as model statements in 
mixed-mode, keyword , and positional macro-definitions . Keyword and 
positional inner macro-instructions may be used as model statements in 
mixed-mode macro-definitions. 

MACRO-DEFINITION COMPATIBILITY 

Macro-definitions prepared for use with the other System/360 
assemblers having macro language facilities may be used with the Operating 
System/360 assembler provided that all SET symbols are defined in an 
appropriate LCLB, GBLA, GBLB, or GBLC statement. The AIFB and AGOB 
instructions will be processed by the Operating System/360 assembler the 
same way that the AIF and AGO instructions are processed. AIFB and AGOB 
instructions will cause the count set up by the ACTR instructions to be 
decremented in exactly the same way as the AGO and AIF instructions. 
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APPENDIX A: CHARACTER CODES 





















___»^.— —.«-—— ——^»^* 


Character Set 








EBCDIC 


ASCII 




8-Blt 


Punch 




Hexa- 


ASCII 


Printer 


Printer 




Code 


Combination 


Decimal 


Dedmal 


Code 


Graphics 


Graphics 




00000000 


12,0,9,8,1 





00 


00 




NUL 




00000001 


12,9,1 


1 


01 


01 




SOH 




00000010 


12,9,2 


2 


02 


02 




STX 




00000011 


12,9,3 


3 


03 


03 




ETX 




00000100 


12,9,4 


4 


04 


04 




EOT 




00000101 


12,9,5 


5 


05 


09 




HT 




00000110 


12,9,6 


6 


' 06 


06 




ACK 




00000111 


12,9,7 


7 


07 


7F 




DEL 




00001000 


12,9,8 


8 


08 


08 




BS 




00001001 


12,9,8,1 


9 


09 


09 




HT 




00001010 


12,9,8,2 


XO 


OA 


OA 




LF 




00001011 


12,9,8,3 


11 


OB 


OB 




VT 




00001100 


12,9,8,4 


12 


OC 


DC 




FF 




GCOOllOl 


12,9,8,5 


13 


OD 


OD 




CR 




00001110 


12,9,8,6 


14 


OE 


OE 




SO 


00001111 


12,9,8,7 


15 


OF 


OF 




SI 


00010000 


12,11,9,8.1 


16 


10 


10 




DLE 




00010001 


11,9,1 


17 


11 


11 




DCl 




00010010 


11,9,2 


18 


12 


12 




DC2 




00010011 


11,9,3 


19 


13 


13 




DC3 




00010100 


11.9,4 


20 


14 


14 




DC4 




00010101 


11,9,5 


21 


15 


15 




NAK 




00010110 


11.9,6 


22 


16 


08 




BS 




OOOlOlli 


11.9,7 


23 


17 


17 




ETB 




00011000 


11,9,8 


24 


18 


18 




CAN 




00011001 


11,9,8.1 


25 


19 


19 




EM 




00011010 


11,9,8,2 


26 


lA 


lA 




SUB 




00011011 


11,9,8,3 


27 


IB 


IB 




ESC 




00011100 


11,9,8,4 


28 


IC 


IC 




FS 




00011101 


11,9,8,5 


29 


ID 


ID 




GS 




00011110 


11,9,8,6 


30 


IE 


IE 




RS 




00011111 


11,9,8,7 


31 


IF 


IF 




US 




00100000 


11,0,9,8,1 


32 


20 


20 




SP 




00100001 


0,9,1 


33 


21 


21 






00100010 


0,9,2 


34 


22 


22 




11 




00100011 


0,9,3 


35 


23 


23 




// 




00100100 


0,9,4 


36 


24 


24 




$ 




00100101 


0,9,5 


37 


25 


OA 




LF 




00100110 


0,9,6 


38 


26 


17 




ETB 




00100111 


0,9,7 


39 


27 


IB 




ESC 




00101000 


0,9,8 


40 


28 


28 




( 




00101001 


0,9,8,1 


41 


29 


29 




) 



A-1 





Character Set 








EBDIC 


ASCII 


8-Bit 


Punch 




Hexa- 


ASCII 


Printer 


Printer 


Code 


Coobinalons 


Decimal 


Declmal 


Code 


Graphics 


Graphics 


00101010 


0,9,8,2 


42 


2A 


2A 


- 


* 


00101011 


0.9,8,3 


43 


2B 


2B 




+ 


00101100 


0,9,8,4 


44 


2C 


2C 




> 


00101101 


0.9,8,5 


45 


2D 


05 




ENQ 


00101110 


0,9,8,6 


46 


2E 


06 




ACK 


00101111 


0,9,8,7 


47 


2F 


07 




BEL 


00110000 


12,11,0,9,8,1 


48 


30 


30 







00110001 


9.1 


49 


31 


31 




1 


00110010 


9,2 


50 


32 


16 




SYN 


00110011 


9,3 


51 


33 


33 




3 


00110100 


9,4 


52 


34 


34 




4 


00110101 


9,5 


53 


35 


35 




5 


00110110 


9,6 


54 


36 


36 




6 


00110111 


9,7 


55 


37 


04 




EOT 


00111000 


9,8 


56 


38 


38 




8 


00111001 


9.8,1 


57 


39 


39 




9 


00111010 


9,8,2 


58 


3A 


3A 




I 


00111011 


9,8,3 


59 


3B 


3B 




• 
> 


00111100 


9,8,4 


60 


3C 


14 




DC4 


00111101 


9,8,5 


61 


3D 


15 




NAK 


00111110 


9,8,6 


62 


3E 


3E 




> 


00111111 


9,8,7 


63 


3F 


lA 




SUB 


01000000 




64 


40 


20 


(blank) 


t 


01000001 


12,0,9,1 


65 


41 


41 




A 


01000010 


12,0,9,2 


66 


42 


42 




B 


01000011 


12,0,9,3 


67 


43 


43 




C 


01000100 


12,0,9,4 


68 


44 


44 




D 


01000101 


12,0,9,5 


69 


45 


45 




E 


01000110 


12,0,9,6 


70 


46 


46 




F 


01000111 


12,0,9,7 


71 


47 


47 




G 


01001000 


12,0,9,8 


72 


48 


48 




H 


01001001 


12.8,1 


73 


49 


49 




I 


01001010 


12,8,2 


74 


4A 


5B 


^ (cent sign) 


E 


01001011 


12,8,3 


75 


4B 


2E 


. (period) 


• 


01001100 


12,8,4 


76 


4C 


3C 


< 


< 


01001101 


12,8,5 


77 


4D 


28 


( 


( 


01001110 


12,8,6 


78 


4E 


2B 


+ 


+ 


01001111 


12,8,7 


79 


4F 


21 


1 (Logical OR) 


1 


01010000 


12 


80 


50 


26 


& 


& 


01010001 


12,11,9,1 


81 


51 


51 




Q 


oiolooio 


12,11.9,2 


82 


52 


52 




R 


01010011 


12,11,9,3 


83 


53 


53 




S 


01010100! 


12.11,9.4 


84 


54 


54 




T 


01010101 


12,11,9,5 


85 


55 


55 




U 



A-2 







Character Set 








EBCDIC 


ASCII 




8-Blt 


Punch 




Hexa- 


. ASCII 


Printer 


Printer 




Code 


Combination 


Decimal 


Dedmal 


Codes 


Graphics 


Graphics 




01010110 


12,11,9,6 


86 


56 


56 




V 




01010111 


12,11,9,7 


87 


57 


57 




W 




01011000 


12,11,9,8 


88 


58 


58 




X 




01011001 


11,8.1 


89 


59 


59 




Y 




01011010 


11,8,2 


90 


5A 


5D 


1 


] 




01011011 


11.8,3 


91 


5B 


24 


$ 


$ 




01011100 


11,8,4 


92 


5C 


2A 


* 


* 




01011101 


11,8,5 


93 


5D 


29 


) 


) 




01011110 


11,8.6 


94 


5E 


3B 


* 
> 


• 




01011111 


11.8.7 


95 


5F 


3E 


-.(logical NOT) 


— ! 




01100000 


11 


96 


60 


2D 


- (hyphen) 


- 




01100001 


0,1 


97 


61 


2F 


/ 


/ 




01100010 


11,0,9.2 


98 


62 


62 




b 




01100011 


11,0,9,3 


99 


63 


63 




c 




01100100 


11,0,9,4 


100 


64 


64 




d 




01100101 


11,0,9,5 


101 


65 


65 




e 




01100110 


11,0,9,6 


102 


66 


66 




f 




01100111 


11,0.9,7 


103 


67 


67 




g 




01101000 


11,0.9.8 


104 


68 


68 




h 




01101001 


0,8.1 


105 


69 


69 




/ 




01101010 


12.11 


106 


6A 


7C 




/ 




01101011 


0,8.3 


107 


6B 


2C 


, (comma) 


9 




01101100 


0.8.4 


108 


6C 


25 


% 


% 




01101101 


0.8.5 


109 


6D 


5F 


(underscore) 


_ (under- 
score) 




01101110 


0,8,6 


110 


6E 


3E 


> 


> 




01101111 


0,8,7 


111 


6F 


3F 


? 


? 




01110000 


12,11,0 


112 


70 


70 




P 




01110001 


12,11,0,9,1 


113 


71 


71 




q 




01110010 


12,11,0,9,2 


114 


72 


72 




r 




01110011 


12,11.0,9,3 


115 


73 


73 




8 




01110100 


12,11,0,9,4 


116 


74 


74 




t 




01110101 


12,11,0,9,5 


117 


75 


75 




U 




01110110 


12,11,0,9,6 


118 


76 


76 




V 




01110111 


12,11,0,9,7 


119 


77 


77 




w 




01111000 


12,11,0,9,8 


120 


78 


78 




X 




01111001 


8,1 


121 


79 


60 




• 




01111010 


8,2 


122 


7A 


3A 


• 
• 


• 




01111011 


8,3 


123 


7B 


23 


# 


// 




01111100 


8,4 


124 


7C 


40 


@ 


@ 




01111101 


8,5 


125 


7D 


27 


' (apostrophe^ 


1 • (apos- 
trophe) 




01111110 


8,6 


126 


7E 


3D 


- 


- 




01111111 


8,7 


127 


7F 


22 


It 


It 



A-3 





Character Set 








EBCDIC 


ASCII 


8-Blt 


Punch 




Hexa- 


ASCII 


Printer 


Printer 


Code 


Combination 1 


Decimal 


Declmal 


Code 


Graphics 


Graphics 


10000000 


12,0,8,1 


128 


80 


80 






10000001 


12,0,1 


129 


81 


61 
62 
63 


a 


a 


10000010 


12,0,2 


130 


82 


b 


b 


10000011 


12.0,3 


131 


83 


c 


c 


10000100 


12,0,4 


132 


84 


64 


d 


d 


10000101 


12,0,5 


133 


85 


65 


e 


e 


10000110 


12,0,6 


134 


86 


66 


f 


f 


10000111 


12,0,7 


135 


87 


67 


g 


g 


10001000 


12,0,8 


136 


88 


68 


h 


h 


10001001 


12,0,9 


137 


89 


69 


i 


1 


10001010 


12,0.8,2 


138 


8A 


8A 






10001011 


12,0,8,3 


139 


8B 


8B 






10001100 


12,0,8,4 


140 


8C 


8C 






10001101 


12,0,8,5 


141 


8D 


8D 






10001110 


12,0,8,6 


142 


8E 


8E 






10001111 


12,0,8,7 


143 


8F 


8F 






10010000 


12,11,8,1 


144 


90 


90 






10010001 


12,11.1 


145 


91 


6A 


J 




10010010 


12,11,2 


146 


92 


6B 


k 


k 


10010011 


12,11.3 


147 


93 


6C 


1 


1 


10010100 


12,11.4 


148 


94 


6D 


m 


m 


10010101 


12,11,5 


149 


95 


6E 


n 


n 


10010110 


12,11,6 


150 


96 


6F 


o 


o 


10010111 


12,11,7 


151 


97 


70 


P 


P 


10011000 


12,11,8 


152 


98 


71 


q 


q 


10011001 


12,11,9 


153 


99 


72 


r 


r 


10011010 


12,11,8.2 


154 


9A 


9A 






10011011 


12,11,8,3 


155 


9B 


9B 






10011100 


12,11,8,4 


156 


9C 


9C 






10011101 


12,11,8,5 


157 


9D 


9D 






10011110 


12,11,8,6 


158 


9E 


9E 






10011111 


12,11,8.7 


159 


9F 


9F 






10100000 


11,0,8,1 


160 


AO 


AO 






10100001 


11,0.1 


161 


Al 


7E 




*^% 


10100010 


11.0,2 


162 


A2 


73 


8 


s 


10100011 


11.0,3 


163 


A3 


74 


t 


t 


10100100 


11.0.4 


164 


A4 


75 


u 


u 


10100101 


11.0.5 


165 


A5 


76 


V 


V 


10100110 


11,0,6 


166 


A6 


77 


w 


w 


10100111 


11.0.7 


167 


A7 


78 


X 


X 


10101000 


11.0.8 


168 


A8 


79 


y 


y 


10101001 


11.0.9 


169 


A9 


7A 


z 


z 


10101010 


11,0,8,2 


170 


AA 


AA 






10101011 


11,0,8,3 


171 
_L 


AB 


AB 


.^ — 






A-4 





Character Set 








EBCDIC 


ASCII 


8-Bit 


Punch 




Hexa- 


ASCII 


Printer 


Printer 


Code 


Combination 


Decimal 


Dednal 


Code 


Graphics 


Graphicfi 


10101100 


11,0,8,4 


172 


AC 


AC 




r 


10101101 


11,0,8,5 


173 


AD 


AD 






10101110 


11,0,8,6 


174 


AE 


AE 






10101111 


11,0,8,7 


175 


AF 


AF 






10110000 


12,11,0,8,1 


176 


BO 


BO 






10110001 


12,11,0,1 


177 


Bl 


Bl 






10110010 


12,11,0,2 


178 


B2 


B2 






10110011 


12,11,0,3 


179 


B3 


B3 






10110100 


12,11,0,4 


180 


B4 


B4 






10110101 


12,11,0,5 


181 


B5 


B5 






10110110 


12,11,0.6 


182 


B6 


B6 






10110111 


12,11,0,7 


183 


B7 


B7 






10111000 


12,11,0,8 


184 


B8 


B8 






10111001 


12,11,0,9 


185 


B9 


B9 






10111010 


12,11,0,8,2 


186 


BA 


BA 






10111011 


12,11,0,8,3 


187 


BB 


BB 






10111100 


12,11,0,8,4 


188 


BC 


BC 






10111101 


12,11,0,8,5 


189 


BD 


BD 






10111110 


12,11,0,8,6 


190 


BE 


BE 






10111111 


12,11,0,8,7 


191 


BF 


BF 






11000000 


12,0 


192 


CO 


7B 




{ 


11000001 


12,1 


193 


CI 


41 


A 


A 


11000010 


12,2 


194 


C2 


42 


B 


B 


11000011 


12,3 


195 


C3 


43 


C 


C 


11000100 


12,4 


196 


C4 


44 


D 


D 


11000101 


12,5 


197 


C5 


45 


E 


E 


11000110 


12,6 


198 


C6 


46 


F 


F 


11000111 


12,7 


199 


C7 


47 


G 


G 


11001000 


12,8 


200 


C8 


48 


H 


H 


11001001 


12,9 


201 


C9 


49 


I 


I 


11001010 


12.0,9,8,2 


202 


CA 


CA 






11001011 


12,0.9,8,3 


203 


CB 


CB 






11001100 


12,0,9,8,4 


204 


CC 


CC 






11001101 


12,0,9,8,5 


205 


CD 


CD 






11001110 


12,0,9,8,6 


206 


CE 


CE 






11001111 


12,0,9,8,7 


207 


CF 


CF 






11010000 


11,0 


208 


DO 


7D 




} 


11010001 


11,1 


209 


Dl 


4A 


J 


J 


11010010 


11,2 


210 


D2 


4B 


K 


K 


11010011 


11,3 


211 


D3 


4C 


L 


L 


11010100 


11,4 


212 


D4 


4D 


M 


M 


11010101 


11,5 


213 


D5 


4E 


N 


N 


11010110 


11,6 


214 


D6 


4F 








11010111 


11,7 


215 


D7 


50 


Ll 1 


P 



A-5 





Character Set 








EBCDIC 


ASCII 


8-Blt 


Punch 




Hexa- 


ASCII 


Printer 


Printer 


Code 


Conblnatlon 


Decimal 


Declmal 


Code 


Graphics 
Q 


Graphics 


11011000 


11,8 


216 


D8 


51 


Q 


11011001 


11.9 


217 


D9 


52 


R 


R 


11011010 


12,11,9.8.2 


218 


DA 


DA 






11011011 


12,11.9.8,3 


219 


DB 


DB 






11011100 


12,11.9.8.4 


220 


DC 


DC 






11011101 


12,11.9.8.5 


221 


DD 


DD 






11011110 


12,11,9.8,6 


222 


DE 


DE 






11011111 


12,11.9.8.7 


223 


DF 


DF 






11100000 


0.8.2 


224 


EO 


EO 






11100001 


11,0,9,1 


225 


El 


5C 




\ 


11100010 


0,2 


226 


E2 


53 


S 


S 


11100011 


0,3 


227 


E3 


54 


T 


T 


11100100 


O.A 


228 


E4 


55 


U 


U 


11100101 


0.5 


229 


E5 


56 


V 


V 


11100110 


0,6 


230 


E6 


57 


W 


w 


11100111 


0.7 


231 


E7 


58 


X 


X 


11101000 


0,8 


232 


E8 


59 


Y 


Y 


11101001 


0.9 


233 


E9 


5A 


Z 


Z 


11101010 


11,0,9,8,2 


234 


EA 


EA 






11101011 


11,0,9,8,3 


235 


EB 


EB 






11101100 


11,0,9,8,4 


236 


EC 


EC 






11101101 


11,0,9,8,5 


237 


ED 


ED 






11101110 


11,0,9,8,6 


238 


EE 


EE 






11101111 


11.0,9,8,7 


239 


EF 


EF 






11110000 





240 


FO 


30 








11110001 


1 


241 


Fl 


31 


1 


1 


11110010 


2 


242 


F2 


32 


2 


2 


11110011 


3 


243 


F3 


33 


3 


3 


11110100 


4 


244 


F4 


34 


4 


4 


11110101 


5 


245 


F5 


35 


5 


5 


11110110 


6 


246 


F6 


36 


6 


6 


11110111 


7 


247 


F7 


37 


7 


7 


11111000 


8 


248 


F8 


38 


8 


8 


11111001 


9 


249 


F9 


39 


9 


9 


11111010 


12,11,0,9,8.2 


250 


FA 


FA 






11111011 


12,11,0,9,8,3 


251 


FB 


FB 






11111100 


12,11,0,9,8,4 


252 


FC 


FC 






11111101 


12,11,0,9,8,5 


253 


FD 


FD 






11111110 


12,11,0,9,8,6 


254 


FE 


FE 






11111111 


12,11,0,9,8,7 


255 


FF 


FF 
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Special Graphic Characters 

C Cent Sign 

. Period, Decimal Point 

< Less-than Sign 

( Left Parenthesis 

+ Plus Sign 

Vertical Bar, Logical OR 
& Ampersand 
! Exclamation Point 
$i Dollar Sign 


* Asterisk > Greater-than Sign 

) Right Parenthesis ? Question Mark 

; Semicolon : Colon 

— 1 Logical NOT // Number Sign 

- Number Sign, Hyphen @ At Sign 

/ Slash ' Prime, Apostrophe 

, Comma " Equal 

% Percent " Quotation Mark 

_ Underscore 


Examples! 


Type 


Bit Pattern 
Bit Positions 
01 23 4567 


Hole Pattern 


Zone Punches 


Digit Punches 


PF 


Control Character 


00 00 0100 


12-9-4 


% 


Special Graphic 


01 10 1100 


0-8-4 

-4— 


R 


Upper Case 


11 01 1101 


11-9 

1 . 


1 

a 


Lower Case 


10 00 0001 


12-0-1 




Control Character, 
function not yet 
assigned 


00 11 0000 


12-11-0-9-8-1 

1 

! 

i 
i 
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APPENDIX B: HEXADECIMAL-DECIMAL NUMBER CONVERSION TABLE 



From hex: Locate each hex digit in its corresponding colximn position 
the decimal equivalents. Add these to obtain the decimal value. 



and note 



From decimal: (1) Locate the largest decimal value in the table that will fit 
into the decimal number to be converted, and C2) note its hex equivalent and hex 
column position. (3) Find the decimal remainder. Repeat the process on this 
and subsequent remainders. 

NOTE: Decimal, hexadecimal, (and binary) equivalents of all 
numbers from Q to 255 are listed on panels 11-14. 



HEXADECIMAL COLUMNS 






6 


: 5 '' 


4 


13 . 


2 


1 


HEX 


- DEC 


HEX 


• DEC 


HEX 


- DEC 


HEX - DEC 


HEX - DEC 


HEX 


- DEC 






































1 . 


1,048,576 


1 


65,536 


1 


4,096 


1 


256 


1 


16 


1 


1 


2 


2,097,152 


2 


131,072 


2 


8,192 


2 


512 


2 


32 


2 


2 


3 


3,145,728 


3 


196,608 


3 


12,288 


3 


768 


3 


48 


3 


3 


4 


4,194,304 


4 


262,144 


4 


16,384 


4 


1,024 


4 


64 


4 


4 


5 


5,242,880 


5 


327,680 


5 


20,480 


5 


1,280 


5 


80 


b 


5 


6 


6,291,456 


6 


393,216 


6 


24,576 


6 


1,536 


6 


96 


6 


6 


7 


7,340,032 


7 


458,752 


7 


28,672 


7 


1,792 


7 


112 


/ 


7 


8 


8,388,608 


8 


524,288 


8 


32,768 


8 


2.048 


8 


128 


8 


8 


9 


9,437,184 


9 


589,824 


9 


36,864 


9 


2,304 


9 


144 


9 


9 


A 


10,485,760 


A 


655,360 


A 


40,960 


A 


2,560 


A 


160 


A 


10 


B 


11,534,336 


B 


720,896 


B 


45.056 


B 


2,816 


B 


176 


B 


11 


C 


12,582,912 


C 


786,432 


C 


49,152 


C 


3.072 


C 


192 


C 


12 


D 


13,631,488 


D 


851,968 


D 


53,248 


D 


3,328 


D 


208 


D 


13 


E 


14,680,064 


E 


917,504 


E 


57,344 


E 


3,584 


E 


224 


E 


14 


F 


15,728,640 


F 


983,040 


F 


61,440 


F 


3,840 


F 


240 


F 


15 


12 3 


4 5 6 7 


G 


12 3 


4 5 6 7 


12 3 


4 


5 6 7 


BYTE 




BYTE 


BYTE 
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POWERS OF 2 








POWER OF 16 




2" 


n 








16« 


n 


256 


8 




2° -16° 




1 





512 


9 




l' -16^ 




16 


1 


1 024 


10 




2« . 16^ 




256 


2 


2 048 


11 




2^2 - 163 




4 096 


3 


4 096 


12 




2^^ - 16^ 




65 536 


4 


8 192 


13 




2^0 - 16^ 




1 048 576 


5 


16 384 


14 




1^' . 16^ 




16 777 216 


6 


32 768 


15 




2" - 16^ 




268 435 456 


7 


65 536 


16 




2^2 . ifiS 




4 294 967 296 


8 


131 072 


17 




2^6 - 16' 




68 719 476 736 


9 


262 144 


18 




2*° . 16^° 




1 099 511 627 776 


10 


524 288 


19 




l'' - 16^^ 




17 592 186 044 416 


11 


1 048 576 


20 




2^8 - 16^2 




281 474 976 710 656 


12 


2 097 152 


21 




2" . 16" 




4 503 599 627 370 496 


13 


4 194 304 


22 




2^6 - 16^* 




72 057 594 037 927 936 


14 


8 388 608 


23 




2^0 o 16^5 




1 152 921 504 606 846 976 


15 


16 777 216 


24 






■ 
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APPENDIX C: MACHINE-INSTRUCTION FORMAT 



BASIC MACHINE FORMAT 



ASSEMBLER OPERAND 
FIELD FORMAT 



APPLICABLE INSTRUCTIONS 




RR 



8 


4 


4 


Operation 






Code 


Ml 


R2 



Op Code 



Rl 



RX 



8 

Operation 
Code 



Op Code 



XI Bl Dl 



8 


4 




Operation 






Code 


Rl 





8 


4 


4 


4 


12 


Operation 
Code 


Rl 


X2 


B2 


D2 



R1,R2 



All RR instructions except 
BCR, SPM, BR, and SVC 



M1,R2 



Rl 



Rl 



BCR 



(See Notes 1,6,8, 
and 9) 



BR 



SPM 



SVC 



8 


4 


4 


4 


12 




Dperatlon 












Code 


Ml 


X2 


B2 


D2 













R1,D2(X2,B2) 
R1,D2(,B2) 

R1,S2(X2) 
R1,S2 

D2(X1,B1) 
D1(,B1) 
SI (XI) 

M1,D2(X2,B2) 

M1,D2(,B2) 

M1,S2(X2) 

M1,S2 

(See Notes 1,6,8, 

and 9) 



All RX instructions except 
BC and BUR 



BUR 



BC 
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BASIC MACHINE FORMAT 



ASSEI!1BLER OPERAND 
FIELD FORMAT 



APPLICABLE INSTRUCTIONS 



RS 



8 


4 


A 


4 


12 


Operation 










Code 


Rl 


R3 


B2 


D2 



8 


4 


4 


4 


12 


Operat^n 










Code 


Rl 




B2 


D2 



Rl 



SI 



OP Code 




Rl 


12 



ss 



8 
Operation 
Code 


8 
12 


4 
Bl 


12 
Dl 






8 
Operation 
Code 




4 
Bl 


12 
Dl 



R1,R3,D2(B2) 
R1,R3,S2 



R1,D2(B2) 
R1,S2 



BXH,BXLE,LM,STM,SIO,TMRS 



R1,I 



8 


4 


4 


4 


12 


4 


12 


Operation 














Code 


LI 


L2 


Bl 


Dl 


B2 


D2 



8 


8 


4 


12 


4 


12 


Operation 
Code 


L 


Bl 


Dl 


B2 


D2 



D1(B1),I2 
SI, 12 



DlCBl) 

SI (See Notes 2,3, 

6,7, and 8) 



All shift Instructions 



All 16 bit Immediate 
Instructions 



D1(L1,B1),D2(L2,B2 
S1(L1),S2(L2) 



D1(L,B1),D2(B2) 
S1(L),S2 



All SI Instructions except 
those listed for other SI 
formats 



LPSW,SSM,TIO,TCH,TS 



PACK,UNPK,MVO,AP, 
CP,DP,MP,SP,ZAP 



NC , OC ,XC , CLC ,MVC ,MVN , 
MVZ ,TR,TRT ,ED ,EDMK 
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Notes for Appendix C ; 

1. Rl, R2, and R3 are absolute expressions that specify general or 
floating-point registers. The general register nuinbers are through 
15; floating-point register nuinbers are 0, 2, 4, and 6. 

2. Dl and D2 are absolute expreaslons that specify displacements. A value 
of - 4095 may be specified. 

3. Bl and B2 are absolute expressions that specify base registers. 
Register numbers are 0-15. 

A. X2 la an absolute expression that specifies an Index register. 
Register numbers are 0-15. 

5. L, LI, and L2 are absolute expressions that specify field lengths. An 
L expression can specify a value of 1 - 256. LI and L2 expressions can 
specify a value of 1 - 16. In all cases, the assembled value will be 
one less than the specified value. 

6. I, 12, and 13 are absolute expressions that provide immediate data. 
The value of I and 12 may be - 255. The value of 13 may be - 9. 

7. SI and S2 are absolute or relocatable expressions that specify an 
address . 

8. RR, RS, and SI instruction fields that are blank under BASIC MACHINE 
FORMAT are not examined during instruction execution. The fields are 
not written in the symbolic operand, but are assembled as binary zeros. 

9. Ml specifies a 4-blt mask. 
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APPENDIX D. Machine Instruction Mnemonic Operation. Codes 

This appendix contains two tables of the mnemonic operation codes for all 
machine instructions that can be represented in assembler language, including 
extended mnemonic operation codes. 

The first table is in alphabetic order by instruction. The second table is in 
numeric order by operation code. 

In the first table is indicated: both the mnemonic and machine operation. codes, 
explicit and implicit operand formats, program Interruptions possible, and 
condition code set. 

The column headings in the first table and the information each column provides 
follow: 

Instruction ; This column contains the name of the instruction associated with 
the mnemonic operation code. 

Mnemonic Operation Code ; This column contains the mnemonic operation code for 
the machine instruction. This is written in the operation field when coding the 
Instruction. 

Machine Operation Code ; This column contains the hexadecimal equivalent of the 
actual machine operation code. The operation code will appear in this form In 
most storage dumps and when displayed on the system control panel. For extended 
mnemonics, this column also contains the mnemonic code of the instruction from 
which the extended mnemonic is derived. 

Operand Format ; This column shows the symbolic format of the operand field in 
both explicit and implicit form. For both forms, Rl, R2, and R3 indicate 
general registers in operands one, two, and three respectively. X2 indicates a 
general register used as an index register in the second operand. Instructions 
which require an index register (X2) but are not to be indexed are shown with a 
replacing X2. L, LI, and L2 indicate lengths for either operand, operand one, 
or operand two respectively. Ml and M3 indicate a 4-bit mask in operand one and 
three, respectively. I, 12, and 13 indicate Immediate data eight bits long (I 
and 12) or four bits long (13). 

For the explicit format, Dl and D2 indicate a displacement and Bl and B2 
indicate a base register for operands one and two. 

For the implicit format, Dl. Bl, and D2, B2 are replaced by SI and S2 which 
indicate a storage address in operands one and two. 

Type of I nstruction ; This column gives the basic machine format of the 
instruction (RR, RX, SI, SSI or RI) . If an Instruction is Included in a special 
feature or is an extended mnemonic, this is also indicated. 
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Program Interruptions Possible ; This column Indicates the possible program 
Interruptions for this Instruction. The abbreviations used are: A 
Addressing, S - Specification, OV - Overflow, P - Protection, Op - Operation (If 
feature Is not Installed), and Other - other Interruptions which are listed. 
The type of overflow Is Indicated by: D - Decimal, E - Exponent, or F - Fixed 
Point . 

Condition Code Set ; The condition codes set as a result of this instruction are 
indicated in this column. (See legend following the table.) 
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Instruction 


Mnemonic 

Operation 

Code 


Machine 


Operand Format 


Code 


Explicit 


Implicit 


Add 

Add 

Add Halfword 

Add Logical 


A 
AR 
AH 
AL 


5A 
U 
4A 
5E 


R1,D2(X2,B2) or R1,D2(,B2) 
Rl R2 

Ri!d2(X2,B2) or R1,D2(,B2) 
R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 

R1,S2(X2) or R1,S2 
R1,S2(X2) or R1,S2 


Add Logical 


ALR 


IE 


R1,R2 




And Logical 


N 


54 


R1,D2(X2,B2) or R1.D2(,B2) 


R1,S2(X2) or R1,S2 


And Logical 

And Logical 

And Logical 

Immediate 


NC 
NR 
NI 


D4 
14 
94 


D1(L,B1),D2(B2) 

R1,R2 

D1(B1),12 


iSl(L),S2 or S1,S2 
SI, 12 


Branch and Link 
Branch and Link 


BAL 
BALR 


45 
05 


R1,D2(X2,B2) or R1,D2(,B2) 
R1,R2 


R1,S2(X2) or R1,S2 


Branch on Condition 
Branch On Condition 
Branch on Count 
Branch on Count 
Branch on Equal 


BC 

BCR 

BCT 

BCTR 

BE 


47 
07 
46 
06 
47 (BC 8) 


M1,D2(X2,B2) or M1,D2(,B2) 

Ml R2 

Ri|d2(X2,B2) or R1,D2(,B2) 

R1,R2 

D2(X2,B2) or D2(,B2) 


M1,S2(X2) or M1,S2 
R1,S2(X2) or Rl,S2 
S2(X2) or S2 


Branch On High 


BH 


47 (BC 2) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch In Index 

High 
Branch on Index 

Low or Equal 
Branch on Low 


BXH 

BXLE 

BL 


86 
87 
47 (BC 4) 


R1,R3,D2(B2) 
R1,R3,D2(B2) 
D2(X2,B2) or D2(,B2) 


R1,R3,S2 
R1,R3,S2 
S2(X2) or S2 

j 


Branch if Mixed 


BM 


47 (BC 4) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch on Minus 


BM 


47 (BC 4) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch On Not Equal 


BNE 


47 (BC 7) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch on Not High 


BNH 


47 (BC 13) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch on Not Low 


BNL 


47 (BC 11) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch on Not Minus 


BNM 


47 (BC 11) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


Branch on Not Ones 


BNO 


47(BC 14) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 
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PROGRAM INTERRUPTION 










INSTRUCTION 


TYPE OF 

INSTRUCTION 


POSSIBLE 


CONDITION CODE SET 




A 


s 


ov 


P 


OP ( 


3THER 


00 


31 


10 


11 


Add 


RX 


X 


X 


F 








Sum-0 


Sum 


Sum 


Overflow 


Add 


RR 






F 








Sum>0 


Sum 


Sum 


Overflow 


Add Halfword 


RX 


X 


X 


F 








Siim-O 


Sum 


Sum 


Overflow 


Add Logical 


RX 


X 


X 










Sum-O H 


Sum H 


Sum I 


Sum I 


Add Logical 


RR 














Sum-O H 


Sum-O H 


Sum-O I 


Sum I 


And Logical 


RX 


X 


X 










J 


K 






And Logical 


ss 


X 






X 






J 


K 






And Logical 


RR 














J 


K 






And Logical 


SI 


X 






X 






J 


K 






Immediate 
























Branch and Link 


RX 














N 


N 


N 


N 


Branch and Link 


RR 














N 


N 


N 


N 


Branch on Condition 


RX 














N 


N 


N 


N 


Branch on Condition 


RR 














N 


N 


N 


N 


Branch on Count 


RX 














N 


N 


N 


N 


Branch on Count 


RR 














N 


N 


N 


N 


Branch on Equal 


RX , Ext .Mnemonic 














N 


N 


N 


N 


Branch on High 


RX , Ext .Mnemonic 














N 


N 


N 


N 


Branch on Index High 


RS 














N 


N 


N 


N 


Branch on Index Low 


RS 














N 


N 


N 


N 


or Equal 
























Brdnch on Low 


RX, Ext .Mnemonic 














N 


N 


N 


N 


Branch If Mixed 


RX, Ext .Mnemonic 














N 


N 


N 


N 


Branch on Minus 


RX, Ext .Mnemonic 














N 


N 


N 


N 


Branch on Not Equal 


RX, Ext .Mnemonic 














N 


N 


N 


N 


Branch on Not High 


RX, Ext .Mnemonic 














N 


N 


N 


N 


Branch on Not Low 


RX, Ext. Mnemonic 














N 


N 


N 


N 


Branch on Not Minus 


RX , Ext .Mnemonic 














N 


N 


N 


N 


Branch on Not Ones 


RX, Ext. Mnemonic 














N 


N 


N 


N 
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Instruction 



Branch on Not Plus 
Branch on Not Zeros 
Branch 1£ Ones 
Branch on Overflow 
Branch on Plus 
Branch if Zeros 
Branch on Zero 

Branch Uncondi- 
tional 

Branch Uncondi- 
tional 

Compare Algebraic 
Compare Algebraic 
Compare Halfword 
Compare Logical 
Compare Logical 

Compare Logical 

Compare Logical 

Immediate! 

Convert to Binary 
Convert to Decimal 
Divide 
Divide 

Exclusive Or 

Exclusive Or 
Exclusive Or 
Exclusive Or 

Immediate i 
Execute 



Mnemonic 

Operation 

Code 



BNP 

BNZ 

BO 

BO 

BP 

BZ 

BZ 

B 

BR 



C 

CR 

CH 

CL 

CLC 

CLR 

clI^ 



CVB 
CVD 
D 
DR 



XC 
XR 
XI 1 



' Machine 
Operation 
Code 



47 (BC 13) 


47 (BC 7) 


47 (BC 1) 


47 (BC 1) 


47(BC 2) 


4^7 (BC 8) 


47 (BC 8) 


47 (BC 15) 


07(BCR 15) 


59 
19 
49 
55 
D5 



Operand Format 



Explicit 



EX 



15 



95 



4F 
4E 
5D 
ID 

57 

D7 
17 
97 

44 



D2(X2,B2) 
D2(X2,B2) 
D2(X2,B2) 
D2(X2,B2) 
D2(X2,B2) 
D2(X2,B2) 
D2(X2,B2) 
D2(X2,B2) 
R2 



or D2(,B2) 
or D2(,B2) 
or D2!(,B2) 
or D2(,B2) 
or D2(,B2) 
or D2(,B2) 
or D2(,B2) 
or D2(,B2) 



Implicit 



R1,D2(X2,B2) or R1,D2(,B2) 

R1,R2 

R1,D2(X2,B2) or R1,D2(,B2) 

R1,D2(X2,B2) or R1,D2(,B2) 

D1(L,B1),D2(B2) 

R1,R2 

Dl(Bl) ,12 



R1,D2(X2,B2) or R1,D2(,B2) 
R1,D2(X2,B2) or R1,D2(,B2) 
R1,D2(X2,B2) or R1,D2(,B2) 
R1,R2 

R1,D2(X2,B2) or R1,D2(,B2) 

D1(L,B1),D1(B2) 

R1»R2 

D1(B1).12 

R1,D2(X2,B2) or R1,D2(,B2) 



S2(X2) or S2 
S2(X2) or S2 
S2(X2) or S2 
S2(X2) or S2 
S2(X2) or S2 
S2(X2) or S2 
S2(X2) or S2 
S2(X2) or S2 

R1,S2(X2) or R1,S2 

R1,S2(X2) or R1,S2 
R1,S2(X2) or R1,S2 
S1(L),S2 or S1,S2 

SI, 12 



R1,S2(X2) or R1,S2 
R1,S2(X2) or R1,S2 
R1,S2(X2) or Rl,S2 



R1,S2(X2) or R1,S2 
S1(L),S2 or S1,S2 
SI, 12 
R1,S2(X2) or R1,S2 
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INSTRUCTION 



TYPE OF 
INSTRUCTION 



Branch on Not Plus 

Branch on Not Zeros 

Branch 1£ Ones 

Branch on Overflow 

Branch on Plus 

Branch If Zeros 

Branch on Zero 

Branch Unconditional 
Branch Unconditional 

Compare Algebraic 
Compare Algebraic 
Compare Halfword 
Compare Logical 

Compare Logical 

Compare Logical 

Compare Logical 
Immediate 

Convert to Binary 
Convert to Decimal 
Divide 
Divide 

Exclusive Or 

Exclusive Or 
Exclusive Or 
Exclusive Or 

Immediate 
Execute 



PROGRAM INTERRUPTIOS 
POSSIBLE 



A S OV 



RX,Ext .Mnemonic 

RX,Ext .Mnemonic 

RX.Ext .Mnemonic 

RX , Ext .Mnemonic 

RX , Ext . Menmoni c 

RX, Ext .Mnemonic 

RX,Ext.Menmonlc 

RX, Ext .Mnemonic 
RR,Ext .Mnemonic 

RX 
RR 
RX 

RX 

ss 

RR 

SI 



RX 
RX 
RX 
RR 

RX 



SS 
RR 
SI 

RX 



P OF OTHER 



CONDITION CODE SET 



00 



N 

N 

N 

N 

N 

N 

N 

N 
N 

Z 
Z 

z 
z 

z 

z 

z 



01 



DataF 

F 
F 



(May 



N 

N 

N 

N 

N 

N 

N 

N 
N 

AA 
AA 
AA 
AA 

AA 

AA 

AA 



N 
N 
N 
N 



10 



K 
K 



be set 



N 

N 

N 

N 

N 

N 

N 

N 
N 

BB 
BB 
BB 
BB 

BB 

BB 

BB 



N 
N 
N 
N 



11 



N 

N 

N 

N 

N 

N 

N 

N 
N 



N 
N 
N 
N 



by this instruction) 
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Mnemonic 


Machine 


Operand Fomat 




Operation 


Operation 




Instruction 


Code 


Code 


Explicit 


Implicit 


Insert Character 


IC 


43 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Load 


L 


58 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Load 


LR 


18 


R1,R2 




Load Address 


LA 


41 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Load and Test 


LTR 


12 


R1,R2 




Load Complement 


LCR 


13 


R1,R2 




Load Halfword 


LH 


48 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Load Multiple 


LM 


98 


R1,R3»D2(B2) 


R1,R3,S2 


Load Negative 


LNR 


11 


R1,R2 




Load Positive 


LPR 


10 


R1,R2 




Load PSW 


LPSW 


82 


DlCBl) 


SI 


Move Characters 


MVC 


D2 


D1(L,B1),D2(B2) 


iSl(L),S2 or S1,S2 


Move Immediate 


MVI 


92 


D1(B1),I2 


SI, 12 


Move Numerics 


MVN 


Dl 


D1(L,B1(,D2(B2) 


S1(L),S2 or S1,S2 


Move with Offset 


MVO 


Fl 


D1,(L1,B1)JD2(L2,B2) 


S1(L1),S2(L2) or S1,S2 


Move Zones 


MVZ 


D3 


D1(L,B1),D2(B2) 


S1(L),S2 or S1,S2 


Multiply 


M 


5C 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Multiply 


MR 


IC 


R1,R2 




Multiply Halfword 


MH 


4C 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


No Operation 


,NOP 


47 (BC 0) 


D2(X2,B2) or D2(,B2) 


S2(X2) or S2 


No Operation 


NOPR 


07 (BC 0)i 


R2 




Or Logical 





56 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) or R1,S2 


Or Logical 


OC 


D6 


D1(L,B1),D2(B2) 


S1(L),S2 or isi,S2 


Or Logical 


OR 


16 


R1,R2 


\ 


Or Logical 


01 


96 


D1(B1),I2 


SI, 12 


Immediate 










Packf 


PACK 


F2 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2) or S1,S2 


Set Program Mask 


SFM 


04 


Rl 




Set Storage Key 


SSK 


08 


R1,R2 




Set System Mask 


SSM 


80 


Dl(Bl) 


SI 


Shift Left Double 


SLDA 


8F 


R1,D2(B2) 


R1,S2 


Algebraic 1 











D-7 







PROGRAM INTERRUPTION. 








INSTRUCTION 


TYPE OF 


POSSIBLE 


CONDITION CODE SET 




INSTRUCTION 


A 


s 


DVJ 


P 


OP OTHER 


00 1 


01 


10 


11 


Insert Character 


RX 


X 












N 


N 


N 


N 


Load 


RX 


X 


X 










N 


N 


N 


N 


Load 


RR 














N 


N 


N 


N 


Load Address 


RX 














N 


N 


N 


N 


Load and Test 


RR 














J 


L 


M 




Load Complement 


RR 






F 








P 


L 


M 





Load Halfword 


RX 


X 


X 










N 


N 


N 


N 


Load Multiple 


RS 


X 


X 










N 


N 


N 


N 


Load Negative 


RR 














J 


L 






Load Positive 


RR 






F 








J 




M 





Load PSW 


81 


X 


X 








A 


QQ 


QQ 


QQ 


QQ 


Move Characters 


ss 


X 






X 






N 


N 


N 


N 


Move Immediate 


SI 


X 






X 






N 


N 


N 


N 


Move Niimerics 


ss 


X 






X 






N 


N 


N 


N 


Move with Offset 


ss 


X 






X 






N 


N 


N 


N 


Move Zones 


ss 


X 






X 






N 


N 


N 


N 


Multiply 


RX 


X 


X 










N 


N 


N 


N 


Multiply 


RR 




X 










N 


N 


N 


N 


Multiply Halfword 


RX 


X 


X 










N 


N 


N 


N 


No Operation 


RX.Ext .Mnemonic 














N 


N 


N 


N 


No Operation 


RR.Ext .Mnemonic 














N 


N 


N 


N 


Or Logical 


RX 


X 


X 










J 


K 






Or Logical 


SS 


X 






X 






J 


K 






Or Logical 


RR 














J 


K 






Or Logical 


SI 


X 






X 






J 


K 






Immediate 
























Pack 


SS 


X 




X 








N 


N 


N 


N 


Set Program Mask 


RR 




X 










RR 


RR 


RR 


RR 


Set Storage Key 


RR 


X 


X 






X 


A 


N 


N 


N 


N 


Set System Mask 


SI 


X 










A 


N 


N 


N 


N 


Shift Left Double 


RS 




X 


F 








J 


L 


M 





Algebraic 












































1 
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Instruction 



Shift Left Double 

Logical 
Shift Left Single 

Algebraic 
Shift Left Single 

Logical 
Shift Right Double 

Algebraic 
Shift light Double 

Logical 

Shift Right Single 

Algebraic 
Shift Right Single 

Logical 



Mnemonic 

Operation 

Code 



Start I/O 

Store 

Store Character 

Store Half word 
Store Multiple 

Subtract 
Subtract 

Subtract Halfword 
Subtract Logical 
Subtract Logical 

Add Double 

Add Double Register 

Add Halfword 

Immediate 
Add Short 

Add Short Inmedlate 
Add Short Register 



SLDL 

SLA 

SLL 

SRDA 

SRDL 

SHA 
SRL 

SIO 

ST 
STC 

STH 
STM 

S 

SR 

SH 

SL 

SLR 

AD 

ADR 

AHI 

AS 

ASI 

ASR 



Branch Unconditional 

Branch Unconditional 

Register 



BU 
BUR 



Machine 

Operation 

Code 



8D 
8B 
89 
8E 
8C 

8A 
88 

9C 

50 
42 

40 
90 

5B 
IB 
4B 
5F 
IF 

6A 
2A 
BA 

53 
AA 
CA 

73 
CE 



Operand Format 



Explicit 



Implicit 



R1,D2(B2) 
R1,D2(B2) 
R1,D2(B2) 
R1,D2(B2) 
R1,D2(B2) 

R1,D2(B2) 
R1,D2(B2) 

R1,R3,D2(B2) 



R1,D2(X2,B2) or R1,D2(,B2) 
R1,D2(X2,B2) or R1,D2C.B2) 

R1,D2(X2,B2) or R1J)2,C,B2) 
R1,R2,D2(B2) 

R1,D2(X2) or R1,D2(X2,B2) 

Rl R2 

Ri!d2(X2,B2) or R1,D2(,B2) 

R1,D2(X2,B2) or R1,D2(,B2) 

R1,R2 

R1,D2(X2,B2) or R1,D2(,B2) 

R1,R2 

R1,I2 

R1,D2(X2,B2) or R1,D2(,B2) 

R1,I2 

R1,R3 

D2(X2,B2) or D2(,B2) 
R2 



R1,S2 
R1,S2 
R1,S2 
R1,S2 
R1,S2 

R1,S2 
R1,S2 



RlU3,S2 

R1,S2(X2) or R1,S2 

R1,D2(X2) or R1,S2 

R1,S2(X2) or R1,S2 
R1,R2,S2 

R1,S2(X2) or R1,S2 

R1,S2(X2) or R1,S2 
R1,S2(X2) or R1,S2 



R1,S2(X2) or R1,S2 



R1,S2(X2) or R1,S2 



S2(X2) or S2 
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PROGRAM INTERRUPTIONS 




INSTRUCTION 


TYPE OF 


POSSIBLE 


CONDITION CODE SET 


INSTRUCTION 


A 


S OV P 


OP ( 


DTHER 


GO 


01 


10 


11 


Shift Left Double 


RS 




X 










N 


N 


N 


N 


Logical 
























Shift Left Single 


RS 






F 








J 


L 


M 





Algebraic 
























Shift Left Single 


RS 














N 


N 


N • 


N 


Logical 
























Shift Right Double 


RS 




X 










J 


L 


M 




Algebraic 
























Shift Right Double 


RS 




X 










N 


N 


N 


N 


Logical 
























Shift Right Single 


RS 














J 


L 


M 




Algebraic 
























Shift Right Single 


RS 














N 


N 


N 


N 


Logical 
























Start I/O 


RS 


X 


X 










MM 


EE 


N 


N 


Store 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Character 


RX 


X 






X 






N 


N 


N 


N 


Store Half word 


RX 


X 


X 




X 






N 


N 


N 


N 


Store Multiple 


RS 


X 


X 




X 






N 


N 


N 


N 


Subtract 


RX 


X 


X 


F 








V 


X 


Y 





Subtract 


RR 






F 








V 


X 


Y 





Subtract Halfword 


RX 


X 


X 


F 








V 


X 


Y 





Subtract Logical 


RX 


X 


X 












W,H 


V.I 


W,I 


Subtract Logical 


RR 
















W,H 


v,i 


W,I 


Add Double 


RX 


X 


X 


F 








Sum»0 


Sum<0 


Sum>0 


Overflow 


Add Double Register 


RR 




X 


F 








Sum«0 


Sum<0 


Sum>0 


Overflow 


Add Halfword 


RI 






F 








Sum<-0 


Sum<0 


Sum>0 


Overflow 


Immediate 
























Add Short 


RX 


X 


X 


F 








Sum"0 


Sum<0 


Sum>0 


Overflow 


Add Short Immediate 


RI 






F 








Sum-0 


Sum<0 


Sum>0 


Overflow 


Add Short Register 


RR 






F 








Sum^O 


Sum<0 


Sum>0 


Overflow 


Branch Unconditional 


RX 














N 


N 


N 


N 


Branch Unconditional 


RR 














N 


N 


N 


N 


Register 
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Instruction 



Mnemonic 

Operation 

Code 



Compare Double 
Compare Double 

Register 
Compare Halfword 

Immediate 
Compare Logical 

Short 
Compare Logical 

Short Immediate 
Compare Logical 

Short Register 
Compare Short 
Compare Short 

Immediate 
Compare Short 

Register 

Divide Short 
Divide Short i 

Immediate 
Divide Short 

Register 

Load Address Short 
Load Complement 

Double Register 
Load Complement 

Short Register 

Load Double 

Load DoubletReg later 

Load Full to 

Short Register 
Load Halfword 

Immediate 
Load Halfword 

Register 
Load Negative 

Short Register 
Load Positive 

Short Register 
Load Short 



CD 
CDR 

CHI 

CLS 

CLSI 

CLSR 

CS 
CSI 

CSR 

DSI 
DSR 



LAS 
LCDR 

LCSR 



LD 

LDR 

LFSR 

LHI 

LHR 

LNSR 

LPSR 

LS 



Machine 

Operation 

Code 



69 
29 

B9 

65 

BS 

C5 

61 
A9 

C9 



4D 
BO 

CD 



51 
23 

C3 



68 
28 
OB 

B8 

DO 

CI 

CO 

74 



Operand Format 



Explicit 



R1,D2(X2,B2) or R1,D2(,B2) 
R1,R2 

R1,I2 

R1.D2(X2,B2) or R1,D2(,B2) 

R1,I2 

R1,R2 

R1,D2(X2,B2) or R1,D2(,B2) 
R1,I2 

R1,R2 



Implicit 



R1,S2(X2) or R1,S2 



R1,S2(X2) or R1,S2 



R1,D2(X2,B2) or R1,D2(,B2) R1,S2(X2) or R1,S2 
R1,I2 



R1,S2(X2) or R1,S2 



R1,R2 



R1,D2(X2,B2) or R1,D2(,B2) 
R1,R2 

R1,R2 



R1,D2(X2,B2) or R1,D2(,B2) 

R1,R2 

R1,R2 

R1,I2 

R1,R2 

R1,R2 

R1,R2 

R1,D2(X2,B2) or R1,D2(,B2) 



R1,S2(X2) or R1,S2 



R1,S2(X2) or R1,S2 



R1,S2(X2) or R1,S2 
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1 




PROGRAM INTERRUPTIONS 








INSTRUCTION 


TYPE OF 
INSTRUCTION 


POSSIBLE 


CONDITION CODE SET 




A 


S 


ov 


P 


OP 


OTHER 


00 


01 


10 


11 


Compare Double 


RX 


X 


X 






.' 


Z 


AA 


BB 






Compare Double 


RR 




X 










Z 


AA 


BB 




Register 
























Compare Halfword 


RI 














Z 


AA 


BB . 




Immediate 
























Compare Logical 


RX 


X 


X 










Z 


AA 


BB 




Short 
























Compare Logical 


RI 














Z 


AA 


BB 




Short Immediate 
























Compare Logical 


RR 














Z 


AA 


BB 




Short Register 
























Compare Short 


RX 


X 


X 










Z 


AA 


BB 




Compare Short 


RI 














z 


AA 


BB 




Immediate 
























Compare Short 


RX 














z 


AA 


BB 




Register 
























Divide Short 


RX 


X 


X 








F 


N 


N 


N 


N 


Divide Short 


RI 














N 


N 


N 


N 


Immediate 
























Divide Short 


RR 














N 


N 


N 


N 


Register 
























1 Load Address Short 


RX 














N 


N 


N 


N 


Load Complement 


RR 




X 


F 








J 


L 


M 





Double Register 






















j 


Load Complement 


RR 






F 








J 


L 


M 


; 


Short Register 
























Load Double 


RX 


X 


X 










N 


N 


N 


N 


Load Double Register 


RR 




X 










N 


N 


N 


N 


Load Full to Short 


RR 






F 








J 


L 


M 





Register 
























Load Halfword 


RI 






















Immediate 
























Load Halfword 


RR 














N 


N 


N 


N 


Register 
























Load Negative Short 


RR 














J 


L 




. 


Register 
























Load Positive Short 


RR 






F 








J 




M 





Register i 
























Load Short 

1 


RX 


X 


X 










N 


N 


N 


N 
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Mnemonic ^Machine 1 


Operand Formet 






Instruction 


uperacion 
Code 


Code 


Explicit 


Imp licit 






Load Short Immediate 


LSI 


A8 


Rl,12 








Load Short Register 

Load and Test 

Load and Test Short 


LSR 

LT 

LTS 


C8 
62 
52 


Rl R2 

RiId2(X2,B2) or R1,D2(,B2) 

R1,D2(X2,B2) or R1,D2(»B2) 


R1,S2(X2) 
R1,S2(X2) 


or R1,S2 
or R1,S2 




Load and Test Short 


LTSR 


C2 


R1,R2 


• 






Register 














Multiple Halfword 


MHI 


BC 


R1,R2 








Immediate 
Multiply Short 


MS 


71 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 




Multiply Short ^ 


MSI 


R3 


R1.I2 








Immediate 
Multiply Short 


MSR 


CC 


R1,R2 








Register 
Normalize 


NRM 


CF 


R1,R2 








And Short 


NS 


64 


R1.D2(X2,B2) or Rl,D2(,B2) 


R1,S2(X2) 


or R1,S2 




And Short Immediate 


NSI 


B4 


R1,I2 








And Short Register 


NSR 


C4 


R1,R2 








Or Short 


OS 


66 


R1,D2(X2,B2) or R1JD2GB») 


R1,S2(X2) 


or R1,S2 




Or Short Immediate 


OSI 


A6 


R1,I2 








Or Short Register 


OSR 


C6 


R1,R2 








Subtract Double 


SD 


6B 


R1,D2(X2,B2) or R1,D2(,B2) 


R1,S2(X2) 


or R1,S2 




Subtract Double 


SDR 


2B 


R1,R2 








Register 

Subtract Halfword 


SHI 


BB 


R1,I2 








Immediate 














Shift Left 


SLAS 


A3 


R1,D2(B2) 


R1,S2 






Arithmetic Short 
Shift Left Logical 


SLLS 


Al 


R1,D2(B2) 


R1,S2 


' 




Short 
Shift Right Arith- 


SRAS 


A2 


R1,D2(B2) 


R1,S2 






metic Short 
Shift Right Logical 


SRLS 


AO 


R1,D2(B2) 


R1,S2 






Short 
Subtract Sort 


SS 


72 


R1.D2(X2,B2) or R1,D2(»B2) 


R1,S2(X2) 


or R1,S2 




Subtract Short 


SSI 


AB 


R1,I2 








Immediate 














Subtract Short 


SSR 


CB 


R1,R2 






Register 






\ 




^ 
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INSTRUCTION 



TYPE OF 
INSTRUCTION 



PROGRAM INTERRUPTIONS 
POSSIBLE 



A S OV P OP OTHER 



CONDITION CODE SET 



o(r 



TJT 



w 



TT 



Load Short Immediate 
Load Short Register 
Load and Test 
Load and Test Short 
Load and Test Short 
Register 

Multiply Halfword 

Immediate 
Multiply Short 
Multiply Short 

Immediate 
Multiple Short 

Register 

Normalize 

And Short 

And Short Immediate 

And Short Register 

Or Short 

Or Short Immediate 

Or Short Register 

Subtract Double 
Subtract Double 

Register 
Subtract Halfword 

Immediate 

Shift Left 

Arithmetic Short 
Shift Left 

Logical Short 
Shift Right 

Arithmetic Short 
Shift Right 

Logical Short 
Subtract Short 
Subtract Short 

Immediate 
Subtract Short 

Register 



RI 
RR 
RX 
RX 
RR 



RI 

RX 
RI 

RR 



RR 

RX 
RI 
RR 

RX 
RI 
RR 

RX 
RR 

RI 



RS 

RS 

RS 

RS 

RX 
RI 

RX 



N 
N 
J 
J 
J 



N 

N 
N 

N 



J 
J 
J 

J 
J 
J 

V 
V 



J 

N 
J 

N 

V 
V 



N 
N 
L 
L 
L 



N 

N 
N 

N 



K 
K 
K 

K 
K 
K 

X 
X 



L 

N 
L 
N 

;X 

X 



N 
N 
M 
M 
M 



M 



M 
N 
M 

N 

Y 
Y 










N 

N 






D-IA 





Mnemonic 

Code 

Code 


Machine 

Code 

Code 


Operand Fomat 


Instruction 


Explicit 


Implicit 


Store Double 


STD 


60 


R1,D2(X2,B2) or R1JD2(,B2) 


R1,S2(X2) or R1,S2 


Exclusive or Short 
Exclusive or Short 

Immediate ! 
Exclusive or Short 

Register i 
Test Bits 
Test Bits Immediate 


XS 
XSI 

XSR 

TB 
TBI 


63 
A7 

C7 

75 

AE 


R1,D2(X2,B2) or R1,D2(,B2) 
R1,I2 

R1,R2 

R1,D2(X2,B2) or R1,D2(,B2) 
R1.I2 


R1,S2(X2) or R1,S2 
R1,S2(X2) or R1,S2 


Supervisor Call 
Test and Set 


SVC 
TS 


OA 
93 


I 
Dl(Bl) 


i 
SI 


Test Under Mask 
Timer Read and Set 
Translate 
Translate and Test 


TM 
TMRS 
TR 
TRT 


91 
A4 
DC 
DD 


D1(B1),I2 
R1,R3,D2(B2) 
D1(L,B1),D2(B2) 
D1(L,B1).D2(B2) 


SI, 12 
R1,R3,S2 

S1(L),S2 or S1,S2 
S1(L),S2 or S1,S2 


Unpack 


UNPK 


F3 


D1(L1,B1),D2(L2,B2) 


S1(L1),S2(L2) or S1,S2 
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PROGRAM INTERRUPTIONS! 






INSTRUCTION 


TYPE OF 
INSTRUCTION 


POSSI 


Mi. 


J 


CONDITION CODE SET 




A 


S 


OV 


P 


OP OTtiER 


00 


01 


10 


11 


Store Double 


RX 


X 


X 




X 






N 


N 


N 


N 


Exclusive Or Short 


RX 


X 


X 










J 


K 






Exclusive Or Short 


RI 














J 


K 






Immediate 
























Exclusive Or Short 


RX 














J 


K 






Register 
























Test Bits 


RX 


X 


X 










UU 


W 




W 


Test Bits Immediate 


RI 














UU 


W 




W 


Supervisor Call 


RR 














N 


N 


N 


N 


Test and Set 


SI 


X 






X 






SS 


TT 






Test Under Mask 


SI 


X 












UU 


W 




WW 


Timer Read and Set 


RS 


X 


X 










N 


N 


N 


N 


Translate 


SS 


X 






X 






N 


N 


N 


N 


Translate and Test 


SS 


X 












PP 


NN 


00 




Unpack 


SS 


X 






X 






N 


N 


N 


N 
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Program Interruptions Possible 



Under Ov: 



D " Decimal 
E • Exponent 
F - Fixed Point 



Under Other: 
A 
B 
C 
D 
£ 
F 
G 
GA 



Privileged Operation 
Exponent Underflow 
Significance 
Decimal Divide 
Floating Point Divide 
Fixed Point Divide 
Execute 
Monitoring 



Condition Code Set 

H No Carry 

I Carry 

J Result » 

K Result Is Not Equal to Zero 

L Result Is less than Zero 

M Result Is Greater Than Zero 

N Not Changed 

Overflow 

P Result Exponent Underflows 

Q Result Exponent Overflows 

R Result Fraction « 

S Result Field Equals Zero 

T Result Field Is Less Than Zero 

U Result Field Is Greater Than Zero 

V Difference - 
W Difference Is Not Equal to Zero 
X Difference Is Less Than Zero 

Y Difference Is Greater Than Zero 
Z First Operand Equals Second Operand 
AA First Operand Is Less Than Second Operand 
B6 First Operand Is Greater Than Second Operand 
CC CSW Stored 

DD Channel and Subchannel not Working 

EE Channel or Subchannel Busy 

FF Channel Operating In Burst Mode 

GG Burst Operation Terminated 

HH Channel Not Operational 

II Interruption Pending In Channel 
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Program Interruptions Possible (Continued) 

J J Channel Available 

KK Not Operational 

LL Available 

MM I/O Operation Initiated and Channel Proceeding With Its Execution 

NN Nonzero Function Byte Found Before the First Operand Field Is 

Exhausted 

00 Last Function Byte Is Nonzero 

PP All Function Bytes Are Zero 

QQ Set According to Bits 34 and 35 of the New PSW Loaded 

RR Set According to Bits 2 and 3 of the Register Specified by Rl 

SS Leftmost Bit of Byte Specified ■ 

TT Leftmost Bit of Byte Specified - 1 

UU Selected Bits Are All Zeros; Mask Is All Zeros 

W Selected Bits Are Mixed (zeros and ones) 

WW Selected Bits Are All Ones 

XX Selected Bytes Are Equal, or mask is zero 

YY Selected field of first operand is low 

ZZ Selected field of first operand Is high 

AAA First-operand and second-operand counts are equal 

AAB First operand count is lower 

AAC First operand count is higher 

AAD No movement because of destructive overlap 

AAE Clock value set 

AAF Clock value secure 

AAG Clock not operational 

AAH Channel ID correctly stored 

AAI Channel activity prohibited during ID 

AAJ Clock value is valid 

AAK Clock value not necessarily valid 

AAL Channel Working with Another Device 

AAM Subchannel busy or Interruption pending 

AAN Clock in error state 

AAO Segment-or Page-Table Length Violation 
AAP Page-Table Entry Invalid (1-Blt One) 
AAQ Reference Bit Zero, Change Bit Zero 
AAR Reference Bit Zero, Change Bit One 
AAS Reference Bit One, Change Bit Zero 
AAT Reference Bit One, Change Bit One 
AAU Segment Table Entry Invalid (1-Bit One) 
AAV Translation Available 
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KB. Format 



OPERATION 
CODE 



GO 
01 
02 
03 
04 
05 
06 
07 
08 
09 
OA 
OB 
OC 

OE 
OF 

10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
lA 
IB 
IC 
ID 
IE 
IF 

20 
21 
22 
23 

24 
25 



NAME 



Set Program Mask 
Branch and Link 
Branch on Count 
Branch on Condition 
Set Storage Key 

Supervisor Call 

Load Full to Short Register 



MNEMONIC 



REMARKS 



Load Positive 

Load Negative 

Load and Test 

Load Complement 

AND 

Compare Logical 

OR 

Exclusive OR 

Load 

Compare 

Add 

Subtract 

Multiply 

Divide 

Add Logical 

Subtract Logical 



Load Complement Double 
Register 



SFM 

BALM 

BCTR 

BCR 

SSK 

SVC 
LFSR 



LFR 

LNR 

LTR 

LCR 

NR 

CLR 

OR 

XR 

LR 

CR 

AR 

SR 

MR 

DR 

ALR 

SLR 



LCDR 
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RR Format 



OPERATION 
CODE 



NAME 



MNEMONIC 



REMARKS 



26 
27 
28 
29 
2A 
2B 
2C 
2D 
2E 
2F 

30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
3A 
3B 
3C 
3D 
3E 
3F 



Load Double Register 
Compare Double Register 
Add Double Register 
Subtract Double Register 



LDR 
CDR 
ADR 
SDR 



RX Format 



40 
41 
42 
43 
44 
45 
46 
47 
48 



Store Halfword 
Load Address 
Store Character 
Insert Character 
Execute 

Branch and Link 
Branch on Count 
Branch on Condition 
Load Halfword 



STH 

LA 

STC 

IC 

EX 

BAL 

BCT 

BC 

LH 
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RX Format 










OPERATION 








CODE 


NAME 


MNQIONIC 


REMARKS 


49 


Compare Halfword 


CH 




4A 


Add Halfword 


AH 




4B 


Subtract Halfword 


SH 




4C 


Multiply Halfword 


MH 




4D 


Divide Short 


DSX 




4E 


Convert to Decimal 


CVD 




4F 


Convert to Binary 


CVB 




50 


Store 


ST 




51 


Load Address Short 


LAS 




52 


Load and Test Short 


LTS 




53 


Add Short 


AS 




54 


AND 


N 




55 


Compare Logical 


CL 




56 


OR 







57 


Exclusive OR 


X 




58 


Load 


L 




59 


Compare 


C 




5A 


Add 


A 




5B 


Subtract 


S 




5C 


Multiply 


M 




5D 


Divide 


D 




5E 


Add Logical 


AL 




5F 


Subtract Logical 


SL 




60 


Store Double 


SD 




61 


Compare Short 


CS 




62 


Load and Test 


LT 




63 


Exclusive Or Short 


XS 




64 


And Short 


NS 




65 


Compare Logical Short 


CLS 


t 


66 


Or Short 


OS 




67 








68 


Load Double 


LD 




69 


Compare Double 


CD 




6A 


Add Double 


AD 




6B 


Subtract Double 


SD 




6C 








6D 








6E 








6F 
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RX Format 












OPERATION 








CODE 


NAME 


MNEMONIC 


REMARKS 


70 








71 


Multiply Short 


MS 




72 


Subtract Short 


SS 




73(X) 


Branch Unconditional 


BU 




74 


Load Short 


LS 




75 


Teat Bits 


TB 




76 








77 








78 








79 








7A 








7B 








7C 








7D 








7E 








7F 








RS. SI. and S 


Format 








80 


Set System Mask 


SSM 




81 








82 


Load FSW 


LPSW 




83 


Diagnose 






84 








85 








86 


Branch on Index High 


BXH 




87 


Branch on Index Low or Equal 


BXLE 




88 


Shl£t Right Single Logical 


SRL 




89 


Shift Left Single Logical 


SLL 




8A 


Shift Right Single 


SRA 




8B 


Shift Left Single 


SLA 




8C 


Shift Right Double Logical 


SRDL 




8D 


Shift Left Double Logical 


SLDL 




8E 


Shift Right Double 


SRDA 




8F 


Shift Left Double 


SLDA 




90 


Store Multiple 


STM 




91 


Test Under Mask 


TM 




92 


Move (Immediate) 


MVI 




93 


Test and Set 


TS 
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RS, SI, and S Format 



OPERATION 
CODE 



94 
95 
96 
97 
98 
99 
9A 
9B 
9C 
9D 
9E 
9F 

AG 

Al 

A2 

A3 

A4 

A5 

A6 

A7 

A8 

A9 

AA 

AB 

AC 

AD 

AE 

AF 

BO 
Bl 
B2 
B3 
B4 
B5 
B6 
B7 
BB 
B9 
BA 



NAME 



MNEMONIC 



AND (Immediate) 

Compare Logical (Immediate) 

OR (Immediate) 

Exclusive OR (Immediate) 

Load Multiple 



Start I/O 



Shift Right Logical Short 
Shift Left Logical Short 
Shift Right Arithmetic Short 
Shift Left Arithmetic Short 
Timer Read and Set 

OR Short Immediate 
Exclusive or Short Immediate 
Load Short Immediate 
Compare Short Immediate 
Add Short Immediate 
Subtract Short Immediate 



Test Bits Immediate 



Divide Short Immediate 



Multiply Short Immediate 

And Short Immediate 

Compare Logical Short Immediate 



Load Halfword Immediate 
Compare Halfword Immediate 
Add Halfword Immediate 



NI 

CLI 

01 

XI 

LM 



SIO 



REMARKS 



SRLS 
SLLS 
SRAS 
SLAS 
TMRS 

OSI 
XSI 
LSI 
CSI 
ASI 
SSI 



TBI 



DSI 



MSI 
ASI 
CLSI 



LHI 
CHI 
AHI 



HTC Only 
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RS. SI. and S 


Format 










OPERATION 








CODE 


NAME 


MNEMONIC 


REMARKS 


BB 


Subtract Halfword Immediate 


SHI 




BC 


Multiply Halfvord Immediate 


MHI 




BD 








BE 








BP 








SS Format 










CO 


Load Positive Short Register 


LPSR 




CI 


Load Negative Short Register 


LNSR 




C2 


Load and Test Short Register 


LTSR 




C3 


Load Complement Short Register 


LCSR 




C4 


And Short Register 


ASR 




C5(RR) 


Compare Logical Short Register 


CLSR 




C6 


Or Short Register 


OSR 




C7 


Exclxislve or Short Register 


XSR 




C8 


Load Short Register 


LSR 




C9 


Compare Short Register 


CSR 




CA(RR) 


Add Short Register 


ASR 




CB 


Subtract Short Register 


SSR 




CC 


Multiply Short Register 


MSR 




CD 


Divide Short Register 


DSR 




CE(R) 


Branch Unconditional Register 


BUR 




CF 


Normalize 


NRM 




DO 


Load Half word Register 


LHR 




Dl 


Move Numerics 


MVN 




D2 


Move (Characters) 


MVC 




D3 


Move Zones 


MVZ 




DA 


AND (Characters) 


NC 




D5 


Compare Logical (Characters) 


CLC 




D6 


OR (Characters) 


OC 




D7 


Exclusive OR (Characters) 


XC 




D8 








D9 








DA 








DB 








DC 


Translate 


TR 




DD 


Translate and Test 


TRT 




DE 
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SS Format 



OPERATION 
CODE 



DF 

EG 
El 
E2 
E3 
E4 
E5 
E6 
E7 
E8 
E9 
EA 
EB 
EC 
ED 
EE 
EF 

FO 
Fl 
F2 
F3 
F4 
F5 
F6 
F7 
F8 
F9 
FA 
FB 
FC 
FD 
FE 
FF 



NAME 



MNEMONIC 



REMARKS 



Move with 

Pack 

Unpack 



Offset 



MVO 

PACK 

UNPK 
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APPENDIX E; ASSEMBLER INSTRUCTIONS 









Operation 


Name Entry 


Operand Entry 




ACTR 


Must not be present 


An arithmetic SETA expression 




AGO 


A sequence symbol or not present 


A sequence symbol 




AIF 


A sequence symbol or not present 


A logical expression enclosed in paren- 
theses, immediately followed by a 
sequence symbol 




ANOP 


A sequence symbol 


Will be taken as a remark 




CNOP 


A sequence symbol or not present 


Two absolute expressions, separated by 
a comma 




COM 


A sequence symbol or not present 


Will be taken as a remark 




COPY 


Must not be present 


A symbol 




CSECT 


Any symbol or not present 


Will be taken as a remark 




CXD* 


Any symbol or not present 


Will be taken as a remark 




DC 


Any symbol or not present 


One or more operands, separated by 

commas 




DROP 


A sequence symbol or not present 


One to sixteen absolute expressions, 
separated by commas 




DS 


Any symbol or not present 


One or more operands, separated by 
commas 




DSECT 


A variable symbol or an 
ordinary symbol 


Will be taken as a remark 




DXD* 


A symbol 


One or more operands, separated by 
commas 




EJECT 


A sequence symbol or not present 


Will be taken as a remark 


- 
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Operation 


Name Entry 


Operand Entry 


END 


A sequence symbol or not present 


A relocatable expression 
or not present 


ENTRY 


A sequence symbol or not present 


One or more relocatable symbols, 
separated by commas 


EQU 


A variable symbol or an 
ordinary symbol 


An absolute or relocatable expression 

One or more relocatable symbols, 
separated by commas 


EXTRN 


A sequence symbol or not present 


GBLA 
6BLB 


Must not be present 
Mxxst not be present 


One or more variable symbols that are 

to be used as SET symbols, separated 

2 
by commas 

One or more variable symbols that are 
to be used as SET symbols, separated 

2 

by commas 


GBLC 
ICTL 


Must not be present 


One or more variable symbols that are 

to be used as SET symbols, separated 

, 2 
by commas 


Must not be present 


One to three decimal values, separated 
by commas 


* Assemble 

2 

SET symb 


r F only 

ols may be defined as subscripted 


SET symbols. 
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Operation 

Entry 


Name Entry 


Operand Entry 


ISEQ 
LCLA 


Must not be present 


Two decimal values, separated by a 
comma 


Must not be present 


One or more variable symbols that are 
to be used as SET symbols, separated by 
commasZ 


LCLB 


Must not be present 


One or more variable symbols that are 
to be used as SET symbols, separated by 
commas^ 


LCLC 


Must not be present 


One or more variable symbols separated 
by commas^ 


LTORG 


Any symbol or not present 


Will be taken as a remark 


MACRO^ 

MEND-"- 

MEXIT^ 


Must not be present 


Will be taken as a remark 


A sequence symbol or nor present 


Will be taken as a remark 


■ 1 ■ ■ I ■■ HI H H 

A sequence symbol or not present 


Will be taken as a remark 


MNOTE*'' 


A sequence symbol, a variable 
symbol or not present 


A severity code, followed by a comma, 
followed by any combination of charac- 
ters enclosed in apostrophes 


OPSYN* 


An ordinary symbol 


A machine Instruction mnemonic code, an 
extended mnemonic code, or an operation 
code defined by a previous OPSYN instruc- 
tion 


A machine or extended mnemonic 
operation code 


Blank 


ORG 


A sequence symbol or not present 


A relocatable expression or not present 


PRINT 


A Sequence symbol or not present 


One to three operands 


Hlay only be used as part of a macro-definition. 

^SET symbols may be defined as subscripted SET symbols. 

^See Section 5 for the description of the name entry. 
♦Assembler F only. 
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Operation 
Entry 


— „—.„—-—.„_—.—„— — — 

Name Entry 


Operand Entry 


PUNCH 


A sequence symbol or not present 


One to eighty characters enclosed In 
apostrophes 


REPRO 


A sequence symbol or not present 


Will be taken as a remark 


SETA 


A SETA symbol 


An arithmetic expression 


SETB 


A SETB symbol 


A or a 1, or logical expression 
enclosed In parentheses 


SETC 


A SETC symbol 


A type attribute, a character expres- 
sion, a substring notation, or a con- 
catenation of character expressions 
and substring notations 


SPACE 


A sequence symbol or not present 


A decimal self-defining term or not 
present 


START 


Any symbol or not present 


A self-defining term or not present 


TITLE3| 


A special symbol (0 to 4 char- 
acters), a sequence symbol, a 
variable symbol, or not present 


One to 100 characters, enclosed In 
apostrophes 


USING 


A sequence symbol or not present 


An absolute or relocatable expression 
followed by 1 to 16 absolute expres- 
sions, separated by commas 


WXTRN 


A sequence symbol or not present 


One or more relocatable symbols, sepa- 
rated by cotmoas 


See Sectlc 
^Assenibler 


m 5 for the description of the name entry • 
F only. 
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ASSEMBLER STATEMENTS 



INSTRUCTIONS 



Model Statements 



3 4 



Prototype Statement 



Macro- Instruction 
Statement 



Assembler Language 

3 4 
Statement 



NAME ENTRY 



An ordinary symbol, variable 
symbol, sequence variable 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 
to a symbol, or not present 



OPERAND ENTRY 



Any combination of char- 
acters (including variable 
symbols) 



A symbolic parameter or 
not present 



An ordinary symbol, a 
variable symbol, a sequence 
symbol, a combination of 
variable symbols and other 
characters that is equivalent 

2 

to a symbol, or not present 



Zero or more operands that 
are symbolic parameters, sep- 
arated by commas, followed by 
zero or more operands (sep- 
arated by commas) of the form 
symbolic parameter, equal sign, 
optional standard value 



An ordinary symbol, a var- 
iable symbol, a sequence 
symbol, a combination 
of variable symbols and 
other characters that is 
equivalent to a symbol, 
or not present 



Zero or more positional 
operands separated by commas, 
followed by zero or more 
keyword operands (separated 
by commas) of the form 

2 
keyword, equal sign, value 



Any combination of characters 
(including variable symbols) 



"Slay only be used as part of a macro definition. 



^Variable symbols appearing in a macro instruction are replaced by their values 

before the macro instruction is processed. 
^Variable symbols may be used to generate assembler language "^^^monic operation 

codes as iCted in Lotion 5, except ACTR, COPY, END, ICTL, CSECT, DSECT, ISEQ, 

PRINT. REPRO, and START. Variable symbols may not be used in the name and 

operand entries of the following instructions: COPY, END, ICTL, and ISEQ. 

Variable symbols may not be used in the name entry of the ACTR instruction. 
^No substitution for variables in the line following a REPRO statement is 

performed. 
5when the name field of a macro Instruction contains a sequence symbol. '^^ sequence 

symbol is not passed as a name field parameter. It only has meaning as a possible 

branch target for conditional assembly. 
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APPENDIX F; SUMMARY OF CONSTANTS 



TYPE 
C 


IMPLIED 

LENGTH 

(BYTES) 

as 
needed 


ALIGN- 
MENT 

byte 


LENGTH 
MODI- 
FIER 
RANGE 

.1 to 
256] (1) 


SPECIFIED 
BY 

characters 


NUMBER 
OF CON- 
STANTS 
PER 
OPERAND 

one 




RANGE 
FOR EX- 
PONENTS 


RANGE 

FOR 

SCALE 


TRUN- 
CATION/ 
PADDING 
SIDE 

right 




X 


as 
needed 


byte 


.1 to 
256 (1) 


hexadecimal 
digits 


one 






left 




B 


as 
needed 


byte 


.1 to 
256 


binary 
digits 


one 






left 




F 


4 


word 


.1 to 
8 


decimal 
digits 


multi- 
ple 


-85 to 
+75 


-187 to 
+346 


left (4) 




H 
E 
D 


2 
A 
8 


half 
word 

word 

double 
word 


.1 to 
8 

.1 to 
8 

.1 to 
8 


decimal 
digits 


multi- 
ple 


-85 to 
+75 


-187 
+346 

0-14 


left (4) 
right (4) 




decimal 
digits 


multi- 
ple 


-85 to 
+75 




decimal 
digits 


multi- 
ple 


-85 to 
+75 


0-14 
0-28 


right (4) 
right (4) 
left 
left 




L(3) 


16 


double 
word 


.1 to 
16 


decimal 
digits 


multi- 
ple 


-85 to 
+75 




P 


as 
needed 


byte 


.1 to 
16 


decimal 
digits 


multi- 
ple 

multi- 
ple 






Z 


as 
needed 


byte 


.1 to 
16 


decimal 
digits 




A 


4 


word 


.1 to 
4 (2) 


any 
expression 


multi- 
ple 






left 
left 

left 




Q(3) 


4 


word 


1-4 


symbol namr 
Ing a DXD 
or DSECT 


• multi- 
ple 








V 


4 


word 


3 or 
4 


relocatable 

symbol 


i multi- 
ple 
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LENGTH 




NUMBER . 
OF CON- 






TRUN- 






IMPLIED 




MODI- 




STANTS 


RANGE 


RANGE 


CATION/ 






LENGTH 


ALIGN- 


FIER 


SPECIFIED 


PER 


FOR EX- 


FOR 


PADDING 




TYPE 


(BYTES) 


MENT RANGE 


BY 


OPERAND 


PONENTS 


SCALE 


SIDE 




S 


2 


half 
word 


2 only 


One absolute 
or relocatable 
expression or 
two absolute 
expressions : 
exp (exp) 


multi- 
ple 










Y 


2 


half 
word 


.1 to 
2 (2) 


any 
expression 


multi- 
ple 






left 




I 


as 
needed 


byte 


.1 to 
256 (1) 




one 






right 




W 


2 


half 


.1 to 


any 


multi- 






left 








word 1 2 (2) 


1 express ion 


_'^! 1 J 


.1 




(1) 


In a DS asseniler Instruction C and X type constants may have length specification 




to 65535. 






(2) 


Bit length specification permitted with absolute expressions only. Relocatable 






A-type constants, 3 or 4 bytes only; relocatable Y-type constants, 2 


bytes only. 




(3) 


Assembler F only. 






(A) 


Errors will be flagged if significant bits are truncated or if the value specified 






cannot be contained in the implied length of the constant. 




^ 
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APPENDIX G: MACRO LANGUAGE SUMMARY 



The four charts In this appendix summarize the macro language described In Part 
II of this publication. 

Chart 1 indicates which macro langu£tge elements may be used in the name and 
operand entries of each statement. 

Chart 2 is a summary of the expressions that may be used in macro-instruction 
statements. 

Chart 3 is a summary of the attributes that may be used in each expression. 

Chart 4 is a summary of the variable symbols that may be used in each 
expression. 





Sferiobl. Symfaeli | 












1 


Satfuanc* 


Global SET Sr'nfaoli 


Lo«1 SET Symbol* 


Syttwn Variable $rfi4»l« 


Am;bwt« 


Symbolic 
forom.lor 


SITA 


SETI 


sere 


SETA 


SCTK 


SETC 


&SYSNDX 


*SYSfCT 


ASYSUST 


Type 


Length 


Scoting 


lrtt.g.r 


Co«r.r 


Number 


MACRO 






































Nmm 


































GILA 




Onm^ 
































Ctlt 






Opawd 






























GIIC 








Opt rand 




























ICLA 










Operond 


























LCL» 












Operand 
























LCLC 














Operand 






















Mod.) 


Nhim. 
Op* rot KM) 

Opofond 


NWIM 


Norn. 

Operation 

Oporand 


Nom. 

Opw^lon 

Opawd 


Nvn* 

Operotion 

Operond 


Nome 

Operation 

Oper»vl 


Name 

Operation 

ppafond 


Nome 
Operand 


Nome 

Operation 

Opefend 


hteme 
Operand 














Nome 


SETA 


o^^ 


Nam. 
Op.<ond 


Op.n»d^ 


Optrond^ 


Nome 
Oparond 


Operand^ 


Oparand* 


Operand 




Operand^ 




Operand 


Operand 


Op.rar>d 


Operivtd 


Operorvd 




SEri 


Op.«nd* 


Op-ood* 


Nom. 
Oparond 


Op.r«>d^ 


Operond^ 


r4om* 
Operand 


Operand' 


Operand* 


Opef»>d^ 


Opeiond* 


Oparond* 


Oparond* 


Operand* 


Operand* 


Operv^* 


Operand^ 




snc 


Opownd 


OpMMd' 


Op.««*» 


Nwn. 
Operand 


Operand^ 


Operand* 


Nome 
OpMond 


Operand 




Opwond 


Op.rand 














AIF 


Op.«>«d* 


Op^md* 


OparmI 


Operand* 


Operand* 


Operand 




Operand* 




Opwond* 


Oparond* 


Operand* 


Operand* 


Operwl* 


Operand* 


Operond* 


Nome 
Operwid 


AGO 


































Nam. 
Oporend 


ACT* 


Op*mr^ 


Opofond 


Opo^ond^ 


Operand^ 


Operand 


Operand^ 


Operand^ 


Operand 








Op«-nd 


Operand 


Opermd 


Operand 


Openmi 




ANOP 


































N»n« 


MEXIT 


































Nome 


MNOTE 


Op. rood 


Oponivd 


Opsrond 


Oparand 


Operand 


Operond 


Operand 


Op«oi>d 




Operand 














Noma 


MIND 


































None 


Out.r 

Macro 




Nsm. 


Nam* 
Op.fand 


Noma 
Operand 


O^ond 


Nome 
Oparond 


Ham, 
Operand 




















fiama 


\nnt 
M.cn> 


Num. 
Operand 


Nmm 
Opmond 


Norn* 
OptroiMl 


Nam. 
Operond 


Nome 
Operond 


Norn. 
Operand 


Nome 
Operand 


Nome 


Nome 
Operand 


Name 
Operand 














Name 


AMMbUf 
LoneuoSt 

SiDtWIMnt 




Nom. 
Opmnd 


Norn. 

Op.ratton 

Oparaitd 


Nwto 

Operation 

Operand 


Noma 

Operation 

Oparond 


Name 

Operation 

Operand 


Ope ^1 ion 
Operand 




















Nome 


1 . VorloU. «yn«bQU in nMKio-tntttuctiom or* i»ploc«d hf Ih.ir vqIum b>for. procMinQ . 

2. Onix ifvalu. ••w4f-<l.finif«torm. 

3. Ceny.rt*<t fo vrltKiwtic ^1 of ^. 

4. Only in chofocMr r.Mton». 

5. Only in oriHwclic rsUtiom. 

«. Only in orithm.tlc or choroer.r rvlatiftnt. 

7. Con*m*m4 to wl^^*4 nvmtmr . 

• . CQnvwt.d to thuracfm t or . 

9. Only tr«»«te.l9ht^clmol digiti. 



Chart 1. Macro Language Elements 
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Chart 2. Conditional Aasanbly Expressions 



Expression 



Arithmetic Expressions 



Character Expressions 



Logical Expressions 



May 
contain 



Operators 
are 



Range 

of values 



1. Self-defining terns 

2. Length* scaling. 
Integer » count » and 
number attributes 

3. SETA and SETB synboli 

4. SETC symbols whose 
value Is 1-8 decimal 
digits 

5. Symbolic parameters 
If the corresponding 
operand Is a self- 
defining term 

6. &SYSLIST(n) If the 
corresponding operant 
Is a self-defining 
term 

?• &SYSLIST(n,m) If the 
corresponding operanc 
Is a self-defining 
term 

8. &SYSNDX 



1. Any combination of 
characters enclosed 
In apostrophes 

2. Any variable symbol 
enclosed In apostrophes 

3. A concatenation of 
variable symbols and 
other characters 
enclosed In apostrophes 

4. A request for a type 
attribute 



1. SETB symbols 

2. Arithmetic re- 
lations^ 

3. Character re- 
locations^ 



+,-,*, and/ 
parentheses permitted 



concatenation, with a 
period (•) 



-231 to +231-1 



through 255 characters 



AND, OR, and NOT 
parentheses per- 
mitted 



(false) or 

1 (true) 



May be 
used In 



1. SETA operands 

2. Arithmetic relations 

3. Subscripted SET 
symbols 

4. &SYSLIST 

5. Substring notation 

6. Subllst notation 



1, SETC operands 

2, Character relations 



1. SETB operands 

2. AIF operands 



1 



An arithmetic relation consists of two arithmetic expressions related by the operators 
GT, LT, EQ, NE, GE, or LE. 
2 
A character relation consists of two character expressions related by the operator 

GT, LT, EQ, NE, GE, or LE. The type attribute notation and the substring notation 
may also be used in character relations. The maximum size of the character expressions 
that can be compared is 255 characters. If the two character expressions are of 
unequal size, then the samller one will always compare less than the larger. 
3 
Maximum of eight characters will be assigned. 
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Chart 3. Attributes 
Attribute 



Type 



Notation 



May be used with: 



Symbols outside 
macro definitions; 
symbolic parameters » 
&SYSLIST(n), and 
&SYSLIST(n»m) Inside 
macto definitions 



May be used only if 
type attribute Is: 



(May always be used) 



May be tised In 



1« SETC operand 

fields 
2. Character 

relations 



■1 



Length 



Scaling 



S' 



Integer 



Count 



!• 



K' 



Number 



N' 



Symbols outside 
macro definitions; 
symbolic parameters » 
&SYSLIST(n), and 
&SYSLIST(n,m) Inside 
macro definitions 



Any letter except 
M,N»0»T» and U 



Symbols outside 
macro definitions; 
symbolic parameters » 
&SYSLIST(n)» and 
&SYSLIST(n,m) Inside 
macro definitions 



and Z 



{Arithmetic 
jexpresslons 



— I 



Arithmetic 
expressions 



Symbols outside 
macro definitions; 
symbolic parameters » 
&SYSLIST(n), and 
&SYSLIST(n,m) Inside 
macro definitions 



Symbolic parameters 
corresponding to 
macro Instruction 
operands » &SYSLIST 
(n), and &SYSLIST(n,m) 
Inside macro 
definitions 



and Z 



Any letter 



{Arithmetic 
expressions 



..J 



Arithmetic 
expressions 



Symbolic parameters » 
&SYSLIST, and 
&SYSLIST(n) Inside 
macro definitions 



Any letter 



Arithmetic 
expressions 



*NOTE: There are definite restrictions in the use of these attributes. Refer to text. 
Section 9. 



G-3 



Chart 4. Variable Synbols 








Variable 
Symbol 

Symbolic^ 
parameter 


Defined by: 


Initialised* 
or set tot 


Value Changed 
by: 


May be used in: 


Prototype 
statement 


Corresponding 
macro Initructlon 
operand 


(Constant 

throughout 

definition) 


1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 


SETA 


LCIA or 6BLA 
Instruction 





SETA 
instruction 


1. Arithmetic expressions 

2. Character expressions 


SETB 


LCLB or GBLB 
Instruction 





SETB 
instruction 


le Arithmetic expressions 
2e Character expressions 
3. Logical expressions 


SETC 


LCLC or GBLC 
Instruction 


Null character 
value 


SETC 
instruction 


le Arithmetic expressions 
if value is self- 
defining term 

2. Character expressions 


&SYSNDX^ 


The assembler 


Macro Instruction 
Index 


(Constant 
throughout 
definition; 
unique for 
each macro- 
instruction) 


le Arithmetic expressions 
12 • Character expressions 


SSYSECT-"- 

1 


The assembler 


Control section 
in which macro 
instruction 
appears 


(Constant 
throughout 
definition; 
set by CSECT» 
DSECTy and 
START) 


Character expressions 


SSYSLIST^ 


The assembler 


Not applicable 


Not applicable 


N'&SYSLIST in arithmetic 
expressions 


&SYSLIST(N)^ 

&SYSLIST 

(N.M)l 


The assembler 


Corresponding 
macro instruction 
operand 


(Constant 

throughout 

definition) 


1. Arithmetic expressions 
if operand is self- 
defining term 

2. Character expressions 


May only be used In macro definitions. 
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APPHTOIX H; SAMPLE PBOCUM 



1. 



2. 



if 

* 



* 
it 
it 

* 

it 



Given: 

A TABLE with 15 entries, eadi 16 bytes Hongyl having the following format: 



I NUMBER of items 
3 bytes 



SWITCHes 



1. 



ADDRESS 



NAME 



] 



1 byte 4 bytes 8 bytes 
A LIST of Items, each 16 bytes long» having the following fonat: 



r NAME 



SWITCHes 



:i 



NUMBER of Items 



ADDRESS 



] 



8 bytes 



1 byte 



3 bytes 



4 bytes 



Find: Any of the Items In the LIST which occur In the TABLE and put the 

SWITCHes, NUMBER of Items, and ADDRESS from that LIST entry into the 
corresponding TABLE entry. If the LIST item does not occur in the 
TABLE, turn on the first bit in the SWITCHes byte of the LIST entry. 



The TABLE entries have been sorted by their NAME. 

TITLE 
PRINT DATA 

THIS IS THE MACRO DEFINITION 

MACRO 

MOVE &TO,&FROM 

DEFINE SETC SYMBOL 

LCLC &TYPE 

CHECK NUMBER OF OPERANDS 

AIF (N'&SYSLIST NE 2).ERR0R1 

CHECK TYPE ATTRIBUTES OF OPERANDS 



AIF 
AIF 
AIF 
AIF 
AGO 
*TYPEDEH ANOP 



(T ' &T0 NE T ' &FRCW) . ERR0R2 

(T'&TO EQ 'C OR It 'WO EQ 'C OR T'&TO EQ •K'),TYPECGK 
(T'&TO EQ 'D' OR T'&TO EQ 'E' OR T'&TO EQ •H'),TYPEDEH 
I (T'&TO EQ 'F').MOVE 
.ERRORS 



SAMPLOOl 

SAMPL002 

SAMPL003 

SAMPL004 

SAMPL005 

SAMFL006 

SAMPL007 

SAMPL008 

SAMPL009 

SAMPLOIO 

SAMPLGll 

SAMPL012 

SAMPL013 

SAMPL014 

SAMPL015 

SAMFL016 

SAMPL017 

SAMPL018 

SAMPL019 

SAMPL020 

SAMPL021 

SAMPL022 

SAMPL023 

SAMPL024 
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.* 
.* 
.* 

&TYPE 
.MOVE 

* 



.* 
.* 
.* 

.TYPECGK 

* 



.* 

.* 

* 

.ERRORll 
.EIIR0R2 
.ERR0R3 
.ERR0R4 

* 

*. 

SAMPLE 
BEGIN 



MORE 



ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 

SETC T'&TO 

ANOP 

NEXT TWO STATEMENTS GENERATED FOR MOVE MACRO 

L&TYPE 2,&FR0M 

ST&TYPE 2,&T0 

MEXIT 

CHECK LENGTH ATTRIBUTES OF OPERANDS 

AIFI (L'&TO NE L'&FROM or L'&TO GT 256) .ERR0R4 
NEXT STATEMENT 6ENEBATED FOR MOVE MACRO 
MVC &TO»&FROM 
MEXIT 

ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 

MNOTE 1, 'IMPROPER NUMBER OF OPERANDS, NO STATEMENTS GENERATED' 

MEXIT 

MNOTE 1, 'OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED' 

MEXIT 

MNOTE 1, 'IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED' 

MEXIT 

MNOTE L, 'IMPROPER OPERAND LENGTHS, NO STATEMENTS GENERATED' 

MEND 

MAIN ROUTINE 



LISTLOOP 



ESTABLISH ADDRESSABILITY OF PROGRAM 
AND TELL THE ASSEMBLER WHAT BASE TO USE 



CSECT 

SAVE (14,12),,* 

BALR R12,0 

USING *,R12 

ST 13,SAVE13 

UI R5,R7,-A(LISTAREA,16,LISTEND) LOAD LIST AREA PARAMETERS 

USING LIST,R5 REGISTER 5 POINTS TO THE LIST 

BAL R14, SEARCH FIND LIST ENTRY IN TABLE 

TM SWITCH.NONE CHECK TO SEE IF NAME WAS FOUND 

BO NOTTHERE BRANCH IF NOT 

USING TABLE, Rl REGISTER 1 NOW POINTS TO TABLE ENTRY 

MOVE TSWITCH,LSWITCH MOVE FUNCTIONS 

MOVE TNUMBER,LNUMBER FROM LIST ENTRY 

MOVE TADDRESS.LADDRESS TO TABLE ENTRY 

BXLE R5,R6,MORE LOOP THROUGH THE LIST 

CLC TESTTABL(240),TABLAREA , 

BNE NOtRIGHT 

CLC TESTLIST(96),LISTAREA 

BNE NOTRIGHT 

WTO 'ASSEMBLER SAMPLE PROGRAM SUCCESSFUL' 



SAMPL025 

SAMPL026 

SAMFL027 

SAMFL028 

SAMPL029 

SAMPL030 

SAMPL031 

SAMPL032 

SAMPL033 

SAMPL034 

SAMPL035 

SAMFL036 

SAMFL037 

SAMFL038 

SAMPL039 

SAMPL040 

SAMPL041 

SAMPL042 

SAMPL043 

SAMPL044 

SAMPL045 

SAMPL046 

SAMPL047 

SAMPL048 

SAMPL049 

SAMPL050 

SAMPL051 

SAMPL052 

SAMPL053 

SAMPL054 

SAMPL055 

SAMPL056 

SAMPL057 

SAMPL058 

SAMPL059 

SAMPL060 

SAMPL061 

SAMPL062 

SAMPL063 

SAMPL064 

SAMPL065 

SAMPL066 

SAMPL067 

SAMFL068 

SAMPL069 

SAMPL070 

SAMPL071 

SAMPL072 

SAMPL073 

SAMPL074 
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EXIT 

* 
NOTRIGHT 

NOTTHERE 

SAVE13 
SWITCH 
NOME 

* 
* 
SEARCH 

LOOP 



L 
RETUBM 

WTO 
B 

01; 

B 

DC 
DC 
EQU 



R13,SAVE13 
(14,12) ,RC-0 

'ASSEMBLER SAMPLE PROGRAM UNSUCCESSFUL* 

EXIT 

LSWITCH.NONE TURN ON SWITCH IN LIST ENTRY 

LISTLOOP GO BACK AND LOOP 

F'C 

X'OO' 

X'80' 



BINARY SEARCH ROUTINE 



HIGHER 

NOTFOUND 

* 
* 
* 

TABLAREA 



NI 

LM 

LA 

SRL 

CLC 

BH 

BCR 

SR 

BCT 

B 

AR 

BCT 

01 

BR 



SWITCH, 255-NONE TURN OFF NOT FOUND SWITCH 
R1,R3,-F'128,4,128' LOAD TABLE PARAMETERS 

GET ADDRESS OF MIDDLE ENTRY 

DIVIDE INCREMENT BY 2 

COMPARE LIST ENTRY WITH TABLE ENTRY 

BRANCH IF SHOULD BE HIGHER IN TABLE 

EXIT IF FOUND 

OTHERWISE IT IS LOWER IN THE TABLE 
SO SUBTRACT INCREMENT 

LOOP 4 TIMES 

ARGUMENT IS NOT IN THE TABLE 

ADD INCREMENT 

LOOP 4 TIMES 

TURN ON NOT FOUND SWITCH 

EXIT 



Rl , TABLAREA-16 (Rl) 

R3,l 

LNAME,TNAME 

HIGHER 

8,R14 

R1,R3 



R2,L00P 

NOTFOUND 

R1,R3 

R2,L00P 

SWITCH, NONE 

R14 



THIS IS THE TABLE 



DS 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 

DC 



OD 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XLS'G 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XL8'0 

XLS'O 

XL8'0 

XL8'0 



',CL8'ALPHA' 

•,CL8'BETA' 

',CL8' DELTA' 

',CL8'EPSIL0N' 

',CL8'ETA' 

',CL8'GAMMA' 

',CL8,I0TA' 

•,CL8' KAPPA' 

•,CL8' LAMBDA' 

',CL8'MU' 

',CL8'NU' 

',CL8' (MICRON' 

',CL8'PHI' 

',CIL8' SIGMA' 

',CL8'ZETA' 



* 
* 
* 



THIS IS THE LIST 



SAMPL075 
SAMPL076 
SAMPL077 
SAMPL078 
SAMPL079 
SAMPL080 
SAMPL081 
SAMPL082 
SAMPL083 
SAMPL084 
SAMPL085 
SAMPL086 
SAMPL087 
SAMPL088 
SAMPL089 
SAMPL090 
SAMPL091 
SAMPL092 
SAMPL093 
SAMPL094 
XSAMPL095 
SAMPL096 
SAMPL097 
SAMPLG98 
SAMPLG99 
SAMPLIOO 
SAMPLIGI 
SAMPL102 
SAMPL103 
SAMPL104 
SAMPL1G5 
SAMFL106 
SAMPL107 
SAMPL108 
SAMPL109 
SAMPLllO 
SAMPLlll 
SAMPL112 
SAMPL113 
SAMPL114 
SAMPL115 
SAMPL116 
SAMPL117 
SAMPL118 
SAMPL119 
SAMPL120 
SAMPL121 
SAMPL122 
SAMPL123 
SAMPL124 
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LISTAREA 



LISTEND 

* 

* 
* 

TESTTABL 



* 
* 
* 
TESTLIST 



* 

RO 

Rl 

R2 

R3 

R5 

R6 

R7 

R12 

R13 

R14 

R15 

* 

* 



DC CLS'LAMBDA' ,X*OA* .FL3'29'A(BE6IM) 

DC CL8'ZETA'.X'05',FL3'5'.AlCLOepy 

DC aS'THETA' ,X'02' ,PL3'45' ,A(BEGIN) 

DC a8'IAU',X'00',rL3'0',Aa) 

DC a8'LIST'.X'IP',FL3'465'.A<Q)l 

DC CL8^ALPHA',X'00',FL3'1'.A(123) 

THIS IS THE CONTROL TABLE 



DS 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



OD 

PL3'1' 

XL8'0' 

XL8|'0' 

XL8'0' 

XLS'O' 

XLS'O' 

XLS'O' 

XLS'O' 

frL3'29 

XLS'O' 

XLS'O' 

XLS'O' 

XLS'O' 

XLS'O' 

FL3'5' 



,X'00',A(123),CLS'ALPHA' 

.CLS'BETA' 

,CLS' DELTA' 

,CLS'EPSILON' 

.CLS'ETA' 

,CLS 'GAMMA' 

.CLS'IOTA' 

.CLS'KAPPA' 

' .X'OA* ,A(BBGIM) .CLS'LAMUA* 

.CLS'MU' 

.CLS'NU' 

.CLS'OMICRON' 

.CLS'PHI' 

,CLS' SIGMA' 

,X'05' ,A(LOOP)|tC|LS'ZETA' 



THIS IS THE CONTROL LIST 

DC CLS'LAMBDA', X'0A',FL3'29',A(BEGIN) 

DC CL8'ZETA',X'05',PL3'5',A(LOOP) 

DC CLS'THETA',X'S2',PL3'45',A(BEGIN) 

DC CLS'TAU',X'S0',FL3'0',A(1) 

DC CL8'LIST',X'9F,PL3'465',Ai(0) 

DC CLS'ALPHA',X'00',FL3'1',A(123) 

THESE ARE THE SYMBOLIC REGISTERS 



EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 





1 

2 

3 

5 

6 

7 

12 

13 

14 

15 



THIS IS THE FORMAT DEFINITION OF LIST ENTRTS 



SAMFL125 

SAMPL126 

SAMPL127 

SAMPL12S 

SAMPL129 

SAMPL130 

SAMPL131 

SAMPL132 

SAMFL133 

SAMPL134 

SAMPL135 

SAMPL136 

SAMPL137 

SAMPL13S 

SAMPL139 

SAMPL140 

SAMPL141 

SAMPL142 

SAMPL143 

SAMPL144 

SAMPL145 

SAMPL146 

SAMPL147 

SAMPL148 

SAMPL149 

SAMPL150 

SAMPL151 

SAMFL152 

SAMPL153 

SAMPL154 

SAMPL155 

SAMFL156 

SAMPL157 

SAMFL15S 

SAMPL159 

SAMPL160 

SAMPL161 

SAMPL162 

SAMPL163 

SAMPL164 

SAMPL165 

SAMPL166 

SAMPL167 

SAMPL168 

SAMPL169 

SAMPL170 

SAMPL171 

SAMPL172 

SAMPL173 

SAMPL174 
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* 
LIST 


DSECT 




LNAME 


DS 


as 


LSWITCH 


DS 


C 


LNUMBER 


DS 


FL3 


LADDBESS 

4t 


DS 


P 


it 

4 


THIS IS 


THE FOBMAT DEFINITION OF 


TABLE 


DSECT 




TNUMBER 


DS 


FL3 


TSWITCH 


DS 


C 


TADDRESS 


DS 


F 


TNAME 


DS 


CL8 




END 


BEGIN 



TABLE ENTRTS 



SAMFL175 
SAMPL176 
SAMPL177 
SAMPL178 
SAMPL179 
SAMFL180 
SAMPL181 
SAMPL182 
SAMFL183 
SAMFL18A 
SAMPL185 
SAMPL186 
SAMPL187 
SAMPL188 
SAMPLld9 
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APPENDIX I; AggfflPliBIt ;^(?UAG^s-ygATyM8 CWPARiy)W CBART 



Features not shown are comnion to all assttniblers. In the chart: 
Dash - Not allowed. 
X -As defined In Operating Sy8tem/360 Assenbler Language Manual 



Feature 


Basic 

Programming 

Support/360 

Basic 

Assenbler 


7090/7094 
Support 
Package 
Assaabler 


BPS SKITa^e, 
BOS 8K Disk 
Aaaaablara 


DOS/TOS 
Assenbler 


OS/360 
Assembler 


No. of Continuation Cards/ 
Statement (exclusive of 
macro-Ins tructlons ) 








1 


1 


2 


Input Character Code 


EBCDIC 


BCD&EBCDIC 


EBCDIC 


EBCDIC 


EBCDIC 


ELEMENTS: 












Maximum Characters per 
symbol 


6 


6 


8 


8 


8 


Character self-defining 

terms 


1 Char* only 


X 


X 


X 


X 


Binary self -defining terms | 


— — 


— " 


X 


X 


X 


Length attribute reference 


— — 


— — 


X 


X 


X 


Literals! 


— — 


— — 


X 


X 


X 


Extended Mnemonics 


— — 


X 


X 


X 


X 


Maximum Location Counter \ 
value 


2"-l 


22^-1 


2"-l 


2"-l 


Z^^-l 


Multiple Control Sections ^ 
p^r assenjibly 






X 


X 


X 


EXPRESSIONS: 












Operators 


+-* 


+-*/ 


4-*/ 


+_*/ 


+-*/ 


Nximber of terms 


3 


16 


3 


16 


16 


Level of parentheses 


.-» — 


" 


1 


5 


5 



Assembler F only 
^DOS 14K D Assembler only 
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Feature 


Basic 

Progrsandng 
Support/360 
Basic 
Assesibler 


7090/7094. 
Support 
Package 
Assenbler 


BPS 8K Tape, 
BOS 8R Disk 
Assemblers 


DOS/TOS 
Assenbler 


OS/360 
Assenbler 


Complex RelocatablUty 


— — 


— — 


X 


X 


X 


ASSEMBLER INSTRUCTIONS: 












DC and DS 












Expression allowed on 
Modifiers 








X 


X 


Multiple operands 











x2 


X 


Multiple constants in 
an operand 






Except 

address 

consts. 


X 


X 


Bit length specifications 











X2 


X 


Scale modifier 


— — 


— — 


X 


X 


X 


Exponent Modifier 


— — 


— — 


X 


X 


X 


DC types 


Except 

B.P.Z 

iV^y.S.L 


Except 
B.V,L 


Except L 


x^ 


X 


DC duplication factor 


Except A 


X 


Except S 


X 


X 


DC duplication factor of 
zero 






Except S 


X 


X 


\ DC length modifier i 


Except 
H, E, ID 


X 


X 


X 

1 


X 


DS types | 


Only C, 
H, F, D 


Only C, 
H. F, D 


Except L 


Xl2 


X 


JDS length modifier | 


Only C 


Only C 


X 


X 


X 


DS maximum length modifier 


256 


256 


256 


65,535 


65,535 


DS constant sub field 
permitted 








X 


X 


X 





Assembler F only 

2 
DOS 14K D Assexnbler only 
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Feature 


Basic 

Prograanlng 

Support/360 

Basic 

Assembler 


7090/7094. 

Support BPS 8K Tape, 
Package BOS 8K Disk 
Assembler Assenablers 


DOS/TOS 
Assembler 


OS/ 360 
Assembler 


COPY 











X 


X 


CSECT 


— — 


— — 


X 


X 


X 


DSECT 


— — 


X 


X 


X 


ISEQ 


— — 


— — 


X 


X 


X 


LTORG 


. 


— — 


X 


X 


X 


PRINT 


— — 


- — 


X 


X 


X 


TITLE 


— — 


X 


X 


X 


X 


COM 


— — 


— — 


— — 


X 


X 


ICTL 


1 operand 
(1 or 25 
only) 


{1 operand 


X 


X 


x 


USING 


2 operands 
(operand 1 
relocatable 
only) 


2-17 oper- 
rands (oper- 
and 1 

relocatable 
only) 


6 operands 


X 


X 


DROP 


1 operand 
only 


X 


5 operands 


X 


X 

1 


CCW 


operand 2 

(relocatable 

only) 


X 


X 


X 


X 


ORG 


no blank 
operand 


no blank 
operand 


X 


X 


X 


ENTRY 


1 operand 
only 


1 operand 
only 


1 operand 
only 


X 


X 


EXTRN 


1 operand 
only (max 14] 


1 operand 
only 


1 operand 
only 


X 


X 
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Feature 


Basic 

Progranodng . 
Support/360 
Basic 
Assenibler 


7090/7094 
Support 
Package 
Assenibler 


BPS 8K Tape 9 
BOS 8K Disk 
Assemblers 


DOS/TOS 

Assembler 


OS/360 
Assenibler 


WXTRN 


- - , 








x2 


X^ 


CNOF 


2 decimal 
digits 


2 decimal 
digits 


2 decimal 
digits 


X 


X 


PUNCH 


. -* 


* " 


^ ^ 


X 


X 


REPRO 


•» — 


" •" 


X 


X 


X 


Macro Instructions 


— — 


— *• 


X 


X 


X 


OPSYN 


— 





— 


— 


x^ 


EQD 


X 


X 


X 


X 


X 



Assembler F only i 
^DOS lAK D Assembler only! 
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Macro Facility Features 



Operand Stibllsts 

Attributes of macro-Instruction 
operands Inside macro definitions 
and symbols used In conditional 
assembly Instructions outside macro 
definitions . 

Subscripted SET symbols 

Maximum number of operands 

Conditional assesobly Instructions 
outside macro definitions 

Maxlmuml number of SET symbols 

global SETA 

global SETB 

global SETC 

local SETA 

local SETB 

local SETC 



BPS 8K Tape» 
BOS 8K Disk 
Assemblers 



49 



16 

128 

16 

16 

128 





BOS 16K 

Disk/Tape 

Assembler 



X 
X 



100' 
X 



* 
* 

* 

* 



OS/360 
Assembler 



X 

X 



X 

200 
X 



* 

* 
* 

* 



*The number of SET symbols permitted Is variable, dependent upon available 
main storage. 

NOTE: The maximum size of a character expression Is 127 characters for the DOS/TOS^ 
Assembler D and 255 characters for the OS Assembler F. 



200 for Assembler F 
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APPENDIX J I SAMPLE MACRO DEFIHITIOBS 



The macro deftntttoM tn th±« »pp«ndtx are typical appUcatlona of tfaa macro language 
and conditional aaaembly. Another macro definition le Included In the aample program 
ea part of Appendix B. 

Notice the uae of the Inner macro Inatructlon (IHBERMAC) iflthln SAVE for the purpoae 
of generating MNOTE atatementa. Included with SAVE are aome examplea of the atate- 

menta generated from It. 



MEMBER NAME SAVE 




MACRO 




&NAME 


SAVE 


&R£G,&CODE,&ID 




LCLA 


&A,&B,&C 




LCLC 


&E,&F,&G,&H 




AIF 


C&REG' EQ ").E1 




AIF 


(•&ID' EQ ••).NULLID 




AIF 


C'&ID' EQ •*•). SPECID 


&A 


SETA 


((K'&ID<-2)/2)*2+4 


&MAME 


B 


&A.(0.15) 


&A 


SETA 


K'ilD 




DC 


AL1(&A) 


.CONTB 


AIF 


(&A GT 32). SPLITUP 


.CONTAA 


AIF 


C4A GT 8) .BRAKDWN 


&E 


8ETC 


'&ID'(&W-1.4A) 




DC 


CL4A'&E' 




AGO 


.CONTA 


.BRAKDVN 


ANOP 




&E 


SETC 


'&ID'C&B+1,8) 




DC 


CL8'&E' 


&B 


SETA 


&B+8 


&A 


SETA 


&A-8 




AGO 


.CONTAA 


.SPLITUP 


ANOP 




&E 


SETC 


'&ID'C&B+1,8) 


&F 


SETC 


'&ID'(&B+9,8) 


&G 


SETC 


•&ID'(&B+17,8) 


&H 


SETC 


•iID'(&B+25,8) 




DC 


CL32'&E.&F.&G.&H' 


&B 


SETA 


&B+32 


&A 


SETA 


&A-32 




AGO 


.CONTB 


.MULLID 


ANOP 




&NAME 


DS 


OH 




AGO 


.CONTA 


.SPECID 


AIF 


C&NAME' EQ ").CSECTN 


&E 


SETC 


'&NAME' 


&A 


SETA 


1 



BRANCH AROUND ID 
LENGTH OF IDENTIFIER 

IDENTIFIER 

IDENTIFIER 



IDENTIFIER 



00020000 

OOOAOOOO 

00060000 

00080000 

00100000 

00120000 

00140000 

00160000 

00180000 

00200000 

00220000 

00240000 

00260000 

00280000 

00300000 

00320000 

00340000 

00360000 

00380000 

00400000 

00420000 

00440000 

00460000 

00480000 

00500000 

00520000 

00540000 

00560000 

00580000 

00600000 

00620000 

00640000 

00660000 

00680000 

00700000 

00720000 

00740000 
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.CONTQ 


AIFl 


('&E'(1,&A) EQ '&E*). LEAVE 




00760000 


&A 


SETA 


&A-fl 




00780000 




AGO 


.CONTQ 




00800000 


.LEAVE 


ANOP 






00820000 


&B 


SETA 


«&A+2)/2)*2+4 




00840000 


&NAME 


B 


&B.(0,1S) 


BRANCH AROUMD ID 


00860000 




DC 


AL1(&A) 




00880000 




DC 


CL&A'&E* 


IDENTIFIER 


00900000 




AGO 


.CONTA 




00920000 


.CSECTN 


AIF 


CiSYSECT' EQ ").E4 




00940000 


&E 


SETC 


•&SYSECT' 


■ 


00960000 


&A 


SETA 


1 




00980000 




AGO 


.CONTQ 




01000000 


.E4 


IHBEBMAC 


78,360 


CSECT NAME NULL 


010210000 


.CONTA 


AIF 


(T'&REG(1) NE 'N').E3 




01040000 




AIF 


C&CODE' EQ 'T'). CONTC 




01060000 




AIF 


C&CODE' NE ").E2 




01080000 


&A> 


SETA 


&REG(l)*4+20 




01100000 




AIF 


(&A LE 75). CONTD 




01120000 


6A 


SETA 


&A-64 




01140000 


.CONTD 


AIF 


(N'&REG NE 2).C0NTE 




01160000 




STM 


&REG(1) ,&REG(2) ,&A, (13) 


SAVE REGISTERS 


01180000 




MEXIT 






01200000 


.COMTE 


AIF 


(N'&REG NE 1).E3 




01220000 




ST 


&REG(l),fiA.(13,0) 


SAVE REGISTER 


01240000 




MEXIT 






01260000 


.CONTC 


AIF 


(&REG(1) GE 14 OR &REG(1) LE 


2) .CONTF 


01280000 




STM 


14,15,12(13) 


SAVE REGISTERS 


01300000 


&A 


SETA 


&REG(l)*4+20 




01320000 




AIF 


(N'&REG NE 2). CONTG 




01340000 




STM 


&REG(1) ,&REG(2) ,&A. (13) 


SAVE REGISTERS 


01360000 




MEXIT 






01380000 


.CONTG 


AIF 


(N'&REG NE 1).E3 




01400000 




ST 


&REG(1),&A.(13,0) 


SAVE REGISTERS 


01420000 




MEXIT 






01440000 


.CONTF 


AIF 


(N'&REG NE 2), CONTH 




01460000 




STM 


14,&REG(2),12(13) 


SAVE REGISTERS 


01480000 




MEXIT 






01500000 


.CONTH 


AIF 


(N'&REG NE 1).E3 




01520000 




STM 


14,&EEG(l).12a3) 


SAVE REGISTERS 


01540000 




MEXIT 






01560000 


.El 


IHBEBMAC 
MEXIT 


18,360 


REG PARAM MISSING 


01580000 
01600000 


.E2 


IHBEBMAC 
MEXIT 


37,360,&CODE 


INVALID CODE SPECIFIED 


01620000 
01640000 


.E3 


IHBEBMAC 


36,360,&REG 


INVALID REGS. SPECIFIED 01660000 




MEND 






01680000 


END OF DATA FOR SDS OR MEMBER 
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* 
* 
* 



SAMPLE SAVE MACRO INSTBUCTIONS 



FOGHORN SAVE 
FORHOSN DS 
SIM 



a4.12) 
OH 

14,12,12(13) SAVE REGISTERS 
*********** 



SAVE (R£G14,R£612) ,T 
DS OH 

12,*** IHB002 INVALID FIRST OPERAND SPECIFIED- (RE61 A, R 
*********** 



SAVMACRO 
SAVMACRO 



SAVE 
B 

DC 
DC 



STM 

MEMBER NAME NOTE 
MACRO 



&NAME 
&NAME 

.ERR 



NOTE 
AIF 



(14,12),T,* 

14(0,15) BRANCH AROUND ID 

AL1(8) 

CL8' SAVMACRO' IDENTIFIER 

14,12,12(13) SAVE REGISTERS 



&DCB 

C&DCB' EQ ").ERR 



IHBINNRA &DCB 

L 15,84(0,1) 

BALR 14,15 

MEXIT 

IHBERMAC 6 

MEND 



LOAD VOTE RIN ADDRESS 
LINK TO NOTE ROUTINE 



MEMBER NAME POINT 



&NAME 
&NAME 

.ERRl 
.ERR2 



MACRO 

POINT &DCB,&LOC 



AIF 

AIF 

IHBINNRA 

L 

BAL 

MEXIT 

IHBERMAC 

MEXIT 

IHBERMAC 

MEND 



C&DCB' EQ 
('&LOC' EQ 
DCB,&LOC 
15,84(0,1) 
14,4(15,0) 



").ERR1 
").ERR2 



LOAD POINT RTN ADDRESS 
LINK TO POINT ROUTINE 



00020000 
00040000 
00060000 
00080000 
00100000 
00120000 
00140000 
00160000 
00180000 



00020000 
00040000 
00060000 
00080000 
00100000 
00120000 
00140000 
00160000 
00180000 
00200000 
00220000 
00240000 



J-3 



MEMBER NAME CHECK 




MACRO 


&NAME 


CHECK &DECB 




AIF (*&DECBP EQ 


&NAME 


IHBIMNRA &DECB 




L 14,8(0,1) 




L 15,52(0,14) 




BALR 14,15 




MEXIT 


.El 


IHBERMAC 07,018 




MEND 



1 1 



).E1 



PICK UP DCB ADDRESS 
LOAD CHECK ROUT. ADDR. 
LINK TO CHECK ROUTINE 



00020000 
00040000 
00060000 
00080000 
00100000 
00120000 
00140000 
00160000 
00180000 
00200000 
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